VBA:对Excel单元格进行合并操作

VBA:对Excel单元格进行合并操作_第1张图片
VBA:对Excel单元格进行合并操作_第2张图片

Sub hb()

Dim n

n = 3

For i = 3 To 18

If Range("b" & i) <> Range("b" & i + 1) Then

Range("b" & n & ":b" & i).Merge

n = i + 1

End If

Next

End Sub

你可能感兴趣的:(VBA,excel)