如何用vba在excel中出現'小計'這個字符，在'小計'下面插於空行

鼠標右擊Sheet1標簽，先查看代碼，在代碼窗口粘貼下面的代碼：

Sub ouyangff()

For i = [a65536].End(3).Row To 1 Step -1

If Right(Cells(i, 1), 2) = "小計" Then Rows(i + 1).Insert Shift:=xlDown

Next

End Sub

按F5 運行程序，按Alt + F11回到Excel去看看結果！！！