我是從上面向下合并的,不知道和從下向上合并的有什么區(qū)別?
Sub 合并()
Application.DisplayAlerts = False
For i = 1 To 20
If Range("a" & i + 1) = Range("a" & i) Then
Range("a" & i + 1 & ":a" & i).Merge
End If
Next
Application.DisplayAlerts = True
End Sub
承擔因您的行為而導致的法律責任,
本站有權保留或刪除有爭議評論。
參與本評論即表明您已經閱讀并接受
上述條款。