用戶工具

網站工具


excel-vba

Excel VBA

開啟 Excel 後按下 Alt + F11 按鍵可以啟動 Visual Basic 編輯器。

Excel 檔案結構

活頁簿

工作表

儲存格

儲存格是最重要的物件。在 VBA 中的儲存格是以「Range 物件」來表示,而不是使用 Cell 物件。

使用 Range 物件選取儲存格

選取單一儲存格
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

使用 Cells 屬性選取儲存格

選取單一儲存格
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

圖表

自訂功能表



網路資源

討論區

BLOG

其他

excel-vba.txt · 上一次變更: 2010/08/23 15:30 (外部編輯)