Question

跪求excel大佬高手啊

哪位大佬知道excel表格，怎么可以快速批量合并，就是把很多单元格的内容合并为一个单元格，姓名必须相对应！！

Answer 1

你好！看了楼主的问题，觉得使用VBA程序处理比较方便快捷。

①VBA程序代码如下：

Sub Merge_Cells()

Dim i1, i2, i3, str1, str2

On Error Resume Next '忽略可能出现的错误

Set mysheet1 = ThisWorkbook.Worksheets("Sheet1") '定义Sheet1

i2 = 1 '初始值置1

For i1 = 2 To 10000  '执行10000行

 If mysheet1.Cells(i1, 1).MergeCells = False Then '如果不是合并单元格

  str1 = str1 & mysheet1.Cells(i1, 1) & mysheet1.Cells(i1, 2)  '拼接

 End If

 If mysheet1.Cells(i1, 1).MergeCells = True Then '如果遇到合并单元格

  i2 = i2 + 1 '行数递增

  mysheet1.Cells(i2, 5) = str1 '写入第5列的单元格

  str1 = "" '置空

 End If

Next

End Sub

②程序运行的结果如下：

Answer 2

可以实现，需要写代码来实现，需要文档