excel中使用vba來創建新的工作薄并另存為的方法，有需要的朋友可以參考本文，來看看吧！

步驟

1、首先我們打開一個工作樣表作為例子。

2、我們使用alt+f11組合快捷鍵進入vbe編輯器，插入一個新的模塊，并在模塊中輸入以下代碼：

Sub AddSaveAsNewWorkbook()

Dim Wk As Workbook

Set Wk = Workbooks.Add

Application.DisplayAlerts = False

Wk.SaveAs Filename:="D:/SalesData.xls"

End Sub

3、工作薄是workbook是一個對象，所以我們定義一個變量wk為對象使用set語句，add新建方法是workbooks對象中的方法，Set Wk = Workbooks.Add即是新建一個工作薄。

4、這里我們禁止excel彈出警告對話框，目的是在運行vba的過程中不會彈出中止過程運行的需要人工去干預的一個警告對話框。大家可以理解一下當你在另存為時，excel會彈出的那個對話框去點擊“確定”過程。

5、另存為方法會讓你選擇存儲文件的路徑和名字，這里我們直接用函數來給其賦值wk是對象，saveas是方法，filename是參數，直接輸入路徑和文件名即可。

6、參數的輸入使用的是：=而不是直接使用=，這點大家要記住。另外因為前面使用過禁止顯示信息提示，在使用完這個過程后，excel會處在不提示狀態，所以我們應該加一句Application.DisplayAlerts = True來恢復設置。

7、運行以上的代碼，會出現錯誤提示，大家可以找一下為什么會出錯，該如何修正，我提示一下錯誤的位置在于某個符號。

以上就是excel使用vba創建新的工作薄并另存為方法介紹，操作很簡單的，大家學會了嗎？希望這篇文章能對大家有所幫助！