excel使用vba创建新的工作薄并另存为
我要评论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创建新的工作薄并另存为方法介绍，操作很简单的，大家学会了吗？希望这篇文章能对大家有所帮助！
相关文章
excel中使用VBA提取指定文件夹中指定扩展名的所有文件名的技巧
项目结束后，要把相关文件的存放位置整理成清单交给同事或领导，提取文件夹名称和路径后，能让接收方精准找到对应文件，减少沟通成本，确保工作衔接顺畅，下面我们就来看看2026-02-26不使用VBA! excel表格提取指定文件夹的所有文件名的技巧
Excel提供了一个名为FILES的宏表函数，可以直接在Excel中批量提取指定文件夹下的文件名,这种方法适合有一定Excel基础的用户，操作相对简单2026-02-26- excel表格中数据很多，也存在很多空白单元格，想要统计空白单元格，该怎么操作呢？下面我们就通过公式快速实现2026-02-26
你还在逐个隐藏和取消隐藏工作表吗? Excel快速批量取消隐藏工作表技巧
在制作Microsoft Excel工作簿时，一般情况下很少会删除源数据所在的Excel工作表，通常的操作办法就是将暂时不用的Excel工作表隐藏起来，下面我们就来看看 Excel批量隐藏和2026-02-09excel表格中销售数据拧麻花怎么办? 教你一招轻松搞定按颜色求和计数的
职场工作中经常会遇到带有设置单元格颜色的表格数据需要求和，或者按字体颜色和表格颜色求和，那么如何来进行计算呢，详细请看下文介绍2026-02-09- excel表格中的数据想要制作成创意图表，该怎么制作玫瑰图呢？下面我们就来看看excel玫瑰图的制作方法2026-02-09
单元格还可以按需自定义设置! Excel单元格格式自定义技巧
excel表格中可以按需自定义设置，该怎么设置呢？下面我们就来根据实际的例子来看看详细设置方法2026-01-19- 规划求解是一个相对较复杂的分析工具，但是在对数据的预测分析上，可谓功能强大，下面我们就来举例看看2026-01-15
- “规划求解”是一组命令的组成部分,借助“规划求解”，可求得工作表上某个单元格中公式的最优（最大或最小）值，并受工作表上其他公式单元格的值的约束或限制，详细请看下2026-01-15
轻松掌握基础功能! 给excel初学者的16个VBA基本代码
欢迎来到VBA的世界！这里有一些简单的代码示例，帮助你快速理解VBA的基础概念，通过这些代码，你可以逐步掌握VBA的精髓，为更复杂的任务打下基础2026-01-13
最新评论