開啟 Excel 後按下 Alt + F11 按鍵可以啟動 Visual Basic 編輯器。
儲存格是最重要的物件。在 VBA 中的儲存格是以「Range 物件」來表示,而不是使用 Cell 物件。
Sub RangeSel1()
Range("C5").Select '選擇儲存格 C5
End Sub
Sub RangeSel2()
Range("B2:D4").Select '選擇連續儲存格範圍 B2:D4
End Sub
Sub RangeSel2()
Range("B2","D4").Select '選擇連續儲存格範圍 B2:D4
End Sub
Sub RangeSel3()
Range("B2,B4,D2,D4").Select
Range("B2:D3,B5:D6").Select
End Sub
Sub RangeSel4()
Range("銷售總額").Select
End Sub
Sub RangeSel5()
Range("1:1").Select '選取第一列
Range("A:A").Select '選取第 A 行
Range("1:3").Select '選取第一列到第三列
Range("A:C").Select '選取第 A 行到第 C 行
Range("1:3,6:6").Select '選取第第一列到第三列,以及第六列
Range("A:C,F:F").Select '選取第 A 行到第 C 行,以及第 F 行
End Sub
Sub CellsSel1()
Cells(5,3).Active '選取 C5 儲存格,格式為 Cells("列","行")
Cells(5,"C").Active
End Sub
Sub CellsSel1()
Cells(1027).Active '用編號選取儲存格,順序是由左至右由上往下從編號 1 開始
End Sub
Sub CellsSel2()
Cells.Select
End Sub
Sub GetValueRange1()
MsgBox Range("A1").Value
End Sub
Sub SetValueRange1()
Range("A1").Value = 123.456 '通用格式
Range("A2").Value = "-1,234,500" '千分位
Range("A3").Value = "2009/01/01" '日期
Range("A4").Value = "11:22:33" '時間
Range("A5").Value = "01234" '文字
End Sub
Sub FormulaRange1()
Range("A10").Formula = "=SUM(A1:A9)"
Range("B10").Formula = "=AVERAGE(B1:B9)"
Range("C10").Formula = "=MAX(C1:C9)"
Range("D10").Formula = "=MIN(D1:D9)"
End Sub
Sub FormulaRange1()
Range("A3").Formula = "=$A$1+$A$2" '絕對參照
Range("B3").Formula = "=B1+B2" '相對參照
End Sub