我有一个excel文件,其中包含以下数据 Original data
我想合并出现在它之前的所有空单元格(自动),如下所示 after merging should look like this
由于文件很多,因此无法手动执行,因此需要查找使用脚本或其他方法的方法。 想要使用autoit但无法做到这一点。 请帮助:)
任何时候都没有完成vba代码,但可以直到谷歌的帮助
.attr
答案 0 :(得分:1)
Sub abc()
Dim a As Integer
Dim b As Integer
Dim c As Integer
For c = 1 To 4
b = 3
For a = b - 1 To 308
If Cells(a, c) = "" Then
Range(Cells(a, c), Cells(a - 1, c)).Merge
Else
b = a
End If
Next
Next
End Sub