偶而還是會用到EXCEL VBA進行開發,紀錄一下語法方便查詢
常用命令:
1. Workbook 活頁簿
2. Workbooks 活頁簿集合
3. Workbooks("filename") 檔名為filename的活頁簿
4. ActiveWorkbook 正在作用中的活頁簿
5. Sheets 活頁簿中所有工作表
6. Sheets(n) 活頁簿中第n張工作表
7. Worksheet 工作表
8. Worksheets 所有工作表(包括圖表)
9. Worksheets("sheet") 指表名為sheet工作表
10. ActiveSheet 正在作用中的工作表
11. Columns("c1:c2") c1至c2欄(其中c1,c2為A~Z或AA~XFD等欄名)
12. Rows("r1:r2") r1至r2列(其中r1,r2為1~1048576等列名
13. Range("x1:x2") x1至x2間的儲存格(其中x1,x2為儲存格位址名稱)
14. cells(i,j) 儲存格(第i列、第j行)
15. ActiveCell 目前的儲存格
16. Selection 目前所選取的物件
使用範例:
Workbooks("Book1").Sheets("Sheet1").Range("A1:D5").Font.Bold = True
Worksheets("Sheet1").Cells.ClearContents
Worksheets("Sheet1").Rows(1).Font.Bold = True
Range("1:1,3:3,8:8")
Worksheets("Sheet1").Cells(6, 1).Value = 10
Worksheets("Sheet1").[A1:B5].ClearContents
ActiveCell.Offset(1, 3).Font.Underline = xlDouble
活頁簿常用屬性:
1.ActiveWorkBook.Name 目前活頁簿的名稱
2.ActiveWorkBook.Save 儲存目前的活頁簿
3.ActiveWorkBook.SaveAs Filename := "filename" 另儲新檔
4.WorkBooks.Add 新增活頁簿
5.WorkBooks(i).Close [SaveChange, Filename, RouteWorkbook] 關閉指定的第i個活頁簿
SaveChange := True 改變儲存
SaveChange := False 不會改變儲存
SaveChange省略時,會出現對話方塊
filename := "檔名"
6.WorkBooks.Open "filename" 開啟一個活頁簿
7.Application.Windows 所有活頁簿視窗
8.WorkBooks.Count 活頁簿的數量
9.WorkBooks.Item(Index) 傳回單一活頁簿,由索引值指定
工作表常用屬性:
Worksheets.Add [Before, After, Count, Type] 新增工作表
Before := Worksheets(n) 出現於某工作表之前
After := Worksheets(n) 出現於某工作表之後
Count := n 新增工作表數量
Type := xlWorksheet (工作表) 或 xlChart (圖表)
WorkSheets.Name 工作表名稱
WorkSheets("Sheet1").Activate 設定工作表為目前作用的功作表
沒有留言:
張貼留言