只能用宏:
1、Alt+F11打开VBA编辑器
2、插入-模块
3、双击模块1,复制以下代码过去
Sub hb()
c = Selection.Column
ii = 1
For i = 2 To Cells(65536, c).End(xlUp).Row
If Cells(i, c) <> "" Then
Range(Cells(ii, c), Cells(i - 1, c)).Merge
ii = i
End If
Next
End Sub
4、选中要合并的列,运行宏hb
按住Ctrl并用鼠标分别拖动点选需要合并的不同区域,再按工具栏上的“合并”按钮即可!
直接选中,按工具栏上的“合并”按钮,就OK了