寫程式大抵也是如此,先設定某些變數的值,然後做動作,動作可能是呼叫另一個 Sub/Function、或直接在設定完後接著做。
來個操作儲存格的練習:
Sub cell_1()
Cells(1, 1).Value = 1
Cells(2, 1).Value = 1
Cells(3, 1).Value = 1
Cells(4, 1).Value = 1
Cells(5, 1).Value = 1
Cells(6, 1).Value = 1
Cells(7, 1).Value = 1
Cells(8, 1).Value = 1
Cells(9, 1).Value = 1
End Sub
跟之前的 MsgBox 例子幾乎一樣(甚至更簡單),只是變成操作 cells 罷了。
也一樣沒有效率,所以用迴圈來化約它、精簡它、抽象化它:
Sub cell_1()
For i = 1 To 9
Cells(i, 1).Value = 1
Next
End Sub