阿果石油论坛

主题：excel VBA 不同标识行之间插入一个空行

阿果发表于 2022-02-14 16:22

Sub aaa()

aa = 0
For i = 1 To 1900

bb = Sheet1.Cells(i, 1)

If bb aa Then
aa = bb
Rows(i).Insert
i = i + 1
End If

Next

End Sub

回帖(1)：
1楼:excel 还是很友好的