1、打開excel軟體,先點擊「開發工具」,再點擊「查看代碼」,打開VBA窗口。
2. vba生成excel文件
使用vba生成一個excel 文件,可以使用以下方法:
1 Workbooks.Add 方法
1.1 語法
新建一個工作表。新工作表將成為活動工作表。
語法
表達式.Add(Template)
表達式 一個代表 Workbooks 對象的變數。
參數
名稱 必選/可選 數據類型 說明
Template 可選 Variant 確定如何創建新工作簿。如果此參數為指定現有 Microsoft Excel 文件名的字元串,那麼創建新工作簿將以該指定的文件作為模板。如果此參數為常量,新工作簿將包含一個指定類型的工作表。可為以下 XlWBATemplate 常量之一:xlWBATChart、xlWBATExcel4IntlMacroSheet、xlWBATExcel4MacroSheet 或 xlWBATWorksheet。如果省略此參數,Microsoft Excel 將創建包含一定數目空白工作表的新工作簿(該數目由 SheetsInNewWorkbook 屬性設置)。
返回值
一個代表新工作簿的 Workbook 對象。
說明
如果 Template 參數指定的是文件,則該文件名可包含路徑。
1.2 workbooks.add 會自動打開一個「工作簿1」這類的wb文件,並activate之
workbooks.add 會自動生成一個 " 工作簿N" 的WB文件,且active
workbooks.add 在add後,會打開一個「工作簿1」這類的wb文件
並且最後add的 wb文件 成為新的 activeworkbook
Sub test98()
Workbooks.Add
End Sub
1.3 workbooks.add(template)
template Variant 類型,可選
1.3.1 template如果指定為 EXCEL內置的常量
可為以下 XlWBATemplate 常量之一
xlWBATChart
xlWBATExcel4IntlMacroSheet
xlWBATExcel4MacroSheet
xlWBATWorksheet
Sub test91()
Workbooks.Add (xlWBATChart)
Workbooks.Add (xlWBATWorksheet)
Workbooks.Add (xlWBATExcel4MacroSheet)
Workbooks.Add (xlWBATExcel4IntlMacroSheet)
End Sub
1.3.2 若 template指定為文本,文本是一個文件路徑,文件必須先存在
(暫時沒發現有什麼用處)
template 如果本參數為指定一現有 Microsoft Excel 文件名的字元串,那麼創建新工作簿將以該指定的文件作為模板
如果template指定為文件,文件必須先存在,否則報錯。
那麼template為一個路徑
如果是完整的絕對路徑,則需要帶path
如果只是相對路徑,那麼 excel 2010版本會去這兒找這個文件:D\用戶目錄/我的文檔下面 ,默認目錄?
好像指定過後會把新的路徑當默認路徑
Sub test96()
Workbooks.Add (ThisWorkbook.Path & "\" & ActiveSheet.Name & ".xlsx")
End Sub
Sub test97()
Workbooks.Add (ActiveSheet.Name & ".xlsx")
End Sub
2、thisworkbook.sheets(1).
這個是將當前代碼所在工作簿的左側第一張表拷貝生成新的工作簿文件。新文件包含一張表格。具體對應的文件跟表格可以根據需求調整
3. 如何用VBA新建一個新的excel表並將其保存在指定目錄下
Sub新建()
Workbooks.Add
ActiveWorkbook.SaveAs"C: est.xls",True
MsgBox"新建Excel工作薄完成"
EndSub