excel中如何用VB按鈕來顯示行

Sub test()

k = k + 1

If k = 1 Then

Rows("10:100").Hidden = True

Else

Range("a1:a" & (9 + k)).EntireRow.Hidden = False

End If

End Sub

就是這麽簡單，編程將就的是思路，有了思路，如果有點基礎，代碼自然就成了！