发布网友 发布时间:2022-02-21 14:38
共2个回答
热心网友 时间:2022-02-21 16:07
代码里不是有
lRow = .Range("A65536").End(xlUp).Row
For i = lRow To 2 Step-1
If .Cells(i, 1).Value = .Cells(i - 1, 1).ValueThen
.Range(.Cells(i- 1, 1), .Cells(i, 1)).Merge
A65536表示A列 ,Cells(i, 1)也表示A列,
如果是B列
将A修改为B ; 将括号后面里的1,全部写为2
以此类推
C D ....F列来自:求助得到的回答
热心网友 时间:2022-02-21 17:25
excel合并单元格内容的方法:
不同版本的Excel操作方式略有不同,但大同小异,下面以Excel2010为例。
1.打开excel2010,选中你要合并的单元格,在开始选项卡下,选择右上角的查找和选择,点击定位条件。
2.打开定位条件对话框,选择空值,然后点击确定。
3.下面要输入公式,如果要向上合并则输入A2=A1,向下合并输入A2=A3,输入以后按ctrl+enter快捷键,excel就会自动填充空白处。
4.选中数据,然后选择数据选项卡,点击分类汇总。
5.打开分类汇总对话框,由于要合并的是表头1的单元格,所以分类字段填写1,汇总方式选择求和,然后确定。
6. 把B列的内容复制到C列。
7.选中C列,点击开始选项卡,在查找和选择下面点击常量,然后按Delete键(键盘右上角)。
8.选择开始选项卡,在对齐方式中选择合并单元格。