開啟 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