VBA中操作Excel經常使用辦法總結。本站提示廣大學習愛好者:(VBA中操作Excel經常使用辦法總結)文章只能為提供參考,不一定能成為您想要的結果。以下是VBA中操作Excel經常使用辦法總結正文
要用VBA來封閉任務簿,用Workbook.Close 辦法便可,而要加入Excel,則用Application.Quit 辦法。
上面是一些代碼示例: 封閉運動任務簿,假如任務簿有更改,提醒能否保留:
Sub CloseWorkbook()
ActiveWorkbook.Close
End Sub
假如要防止湧現提醒,可添加“SaveChanges”參數,如直接保留並封閉任務簿:
Sub ClostAndSaveWorkbook()
ActiveWorkbook.Close Savechanges:=True
End Sub
將上述代碼中的“True”改成“False”,則直接封閉任務簿而不保留。
封閉一切翻開的任務簿,並提醒能否保留:
Sub CloseAllWorkbooks()
On Error Resume Next
Workbooks.Close
End Sub
加入Excel,並提醒對有更改的任務簿停止保留:
Sub QuitExcel()
Application.Quit
End Sub
保留運動任務簿並加入Excel:
Sub SaveActiveWorkAndQuit()
ActiveWorkbook.Save
Application.Quit
End Sub
上面的代碼在加入Excel時都不會提醒能否保留任務簿。
保留一切翻開的任務簿並加入Excel:
Sub SaveAllAndQuit()
For Each wbk In Workbooks
wbk.Save
Next
Application.Quit
End Sub
加入Excel,一切的修改都不保留:
Sub QutiAndNoAlerts()
Application.DisplayAlerts = False
Application.Quit
End Sub
上面羅列了一些VBA的經常使用操作:
翻開一個新任務簿
Workbooks.Add
取得第一個任務簿的稱號
Workbooks(1).Name
取得翻開的任務簿數量
Workbooks.Count
激活第二個翻開的任務簿
Workbooks(2).Activate
激活任務簿Chap02.xls
Workbooks("Chap02.xls").Activate
以後運動的任務簿存盤為NewChap.xls
ActiveWorkbook.SaveAs Filename:="NewChap.xls"
封閉第一個任務簿
Workbooks(1).Close
封閉以後運動的任務簿,不保留變更
ActiveWorkbook.Close SaveChanges:=False
封閉一切翻開的任務簿
Workbooks.Close
假如你運轉了最初一個例子,那末如今你一切的任務簿都曾經封閉了。
在你要在任務表上應用前,請確保先翻開一個新任務簿。
當你除單個任務表時,你必需曉得若何在任務簿裡添加新的任務表,曉得若何選擇一個或一組任務表,曉得若何定名、復制、挪動和刪除任務表。
在VB裡,每一個義務都須要一個專門的辦法或屬性。
添加一個新任務表
Worksheets.Add
取得第一個任務表的稱號
Worksheets(1).Name
選擇名為“Sheet3”的任務表
Worksheets(3).Select
選擇第一,第三和第四個任務表
Worksheets(Array(1,3,4)).Select
激活名為“Sheet1”的任務表
Worksheets(“Sheet1”).Activate
將任務表“Sheet2”挪動到任務表“Sheet1”之前
Worksheets("Sheet2").Move Before:=Worksheets("Sheet1")
重定名任務表“Sheet2”為“Expenses”
Worksheets("Sheet2").Name = "Expenses"
取得以後任務簿裡的任務表數量
Worksheets.Count
刪除以後任務簿裡的任務表“Expenses”
Worksheets("Expenses").Delete