Option Explicit ‘強制對模組內所有變數進行宣告

(2) Option Base 1 ‘指定陣列的第一個下標為1

(3) On Error Resume Next ‘忽略錯誤繼續執行VBA程式碼,避免出現錯誤訊息

(4) On Error GoTo 100 ‘當錯誤發生時跳轉到過程中的某個位置

(5) On Error GoTo 0 ‘恢復正常的錯誤提示

(6) Application.DisplayAlerts=False ‘在程式執行過程中使出現的警告框不顯示

(7) Application.DisplayAlerts=True ‘在程式執行過程中恢復顯示警告框

(8) Application.ScreenUpdating=False ‘關閉螢幕重新整理

(9) Application.ScreenUpdating = True ‘開啟螢幕重新整理

(10) Workbooks.Add() ‘建立一個新的工作簿

(11) Workbooks(“book1.xls”).Activate ‘啟用名為book1的工作簿

(12) ThisWorkbook.Save ‘儲存工作簿

(13) ThisWorkbook.close ‘關閉當前工作簿

(14) ActiveWorkbook.Sheets.Count ‘獲取活動工作薄中工作表數

(15) ActiveWorkbook.name ‘返回活動工作薄的名稱

(16) ThisWorkbook.Name ‘返回當前工作簿名稱

(17) ThisWorkbook.FullName ‘返回當前工作簿路徑和名

(18) ActiveSheet.UsedRange.Rows.Count ‘當前工作表中已使用的行數

(19) Rows.Count ‘獲取工作表的行數(注：考慮相容性)

(20) Sheets(Sheet1).Name= “Sum” ‘將Sheet1命名為Sum

(21) ThisWorkbook.Sheets.Add Before:=Worksheets(1) ‘新增一個新工作表在第一工作表前

(22) ActiveSheet.Move After:=ActiveWorkbook.Sh