使用VBA 合并相同单元格

'工作中用于打印报表时需用到同一列相同数据相邻单元格合并
Private Sub Workbook_BeforePrint(Cancel As Boolean)
'打印之后执行函数
Dim l%, i%
'声明变量
k% = 1 '第一列
l = [A65536].End(xlUp).Row
For i = l To 11 Step -1
'从第11行开始
If Cells(i, k) = Cells(i - 1, k) And Cells(i, k).Value <> “” Then
'条件判断值相同且不为空
Dim findCell As Range
Set findCell = Cells(i - 1, k)
'获取第二个单元格
findCell.Value = “”
'将第二个单元格值设为空值之所以设置为空值是因为会一直弹框提示“合并后只保留左上角数据”
Range(Cells(i - 1, k), Cells(i, k)).Merge
'合并单元格
End If
Next
End Sub

使用VBA 合并相同单元格相关推荐

EXCEL VBA小白第三课：删除行，合并空白单元格
本文首发于我的知乎和公众号info_star,转载请注明出处. 今天要说的这段代码呢,同样是因为同事妹子有需求而写的. 做数据透视表的时候,经常有一个组里面出现几个分支都有数值的情况,老板要求把数据透 ...
php如何读取excel合并单元格_PHP读取excel中合并的单元格的值
RT 在做的一个东西,需要读取excel中个别列的内容,之前用的php excelreader,但是合并的单元格都是空的值,而且我的excel也不好判断只要是空的就用数组中上个的值这种方法,本身exc ...
css 纵向合并_excel只能合并横向单元格
excel怎么将横向和纵向合并在一个单元格在B2单元格输入以下公式,然后向右向下填充公式 =B$1&$A2 详见附图示例 excel在有合并单元格的表怎么只选一列? 就是表格顶部有合并单元格 ...
Excel向下合并空单元格
目录 1.vba实现向下合并空单元格 2.通过Excel操作实现 3.通过方方格子插件在使用Excel时常见如下操作: 将左边的1,2,3,4合并成右边的样子,除了我们手动去合并外还有什么其他方法呢 ...
java jtable 单元格合并_JTable 单元格合并【转】
最近,我为了做一个管理系统,需要用到合并JTable的单元格.查找了很多资料,终于简单的实现了.现在把代码共享出来,希望对大家有用. 本程序主要实现行的合并,列的合并大家可以根据下面的代码修改. CM ...
雅客EXCEL (3)-合并取消单元格、平均值、添加序号
文章目录 0.引言 1.合并单元格和取消单元格(定位查找法) 2.求平均值函数average 3. 添加序号 0.引言本文是微商视频<雅客EXCEL>的视频笔记,通过199元购买的,如需 ...
html表格的表头怎么合并单元格,使用tableGrob合并表头单元格
我目前正在使用以下方法创建表格图像: SummaryTable index, xa, xb, ya, yb, za, zb ) names(SummaryTable) "Main X Sub ...
phpexcel中文教程-设置表格字体颜色背景样式、数据格式、对齐方式、添加图片、批注、文字块、合并拆分单元格、单元格密码保护
转载连接:http://www.cnblogs.com/huangcong/p/3687665.html phpexcel中文教程-设置表格字体颜色背景样式.数据格式.对齐方式.添加图片.批注.文字块 ...
python合并word单元格_python之DataFrame实现excel合并单元格_python
这篇文章主要为大家详细介绍了python之DataFrame实现excel合并单元格,具有一定的参考价值,感兴趣的小伙伴们可以参考一下在工作中经常遇到需要将数据输出到excel,且需要对其中一些单元 ...

使用VBA 合并相同单元格

使用VBA 合并相同单元格相关推荐

最新文章

热门文章