WPS/Excel VBA可以制作一个非常好的数据库系统，而在进行WPS/Excel VBA开发时，往往需要新建一个工作薄。手动建立一个新的工作薄不够人性化，也不能为后来的VBA开发带来便利。那如何使用WPS/Excel VBA生成新的工作薄呢？工具/原料moreWPS/ExcelVBA电脑、鼠标、键盘方法/步骤1/7分步阅读

首先，工具步骤“开发工具——VB编辑器”，打开WPS/Excel表格里的VB编辑器。

2/7

进入WPS/Excel表格里的VB编辑器，依次选择“插入——用户窗体”，插入一个用户窗体。

3/7

然后，新建一个文字框和一个命令按钮，这里，文字框和命令按钮的名称选择默认，你也可以根据实际需要进行修改。

4/7

接下来，用鼠标左键双击命令按钮，进入UserForm1用户窗体的代码编辑器。

5/7

在

Private Sub CommandButton1_Click()

和

End Sub

之间，添加下列代码

Dim WBookN As String, b As String

Workbooks.Add

WBookN = TextBox1.Text

b = ThisWorkbook.Path \ WBookN .xls

ActiveWorkbook.SaveAs Filename:=b

6/7

关闭UserForm1用户窗体的代码编辑器，依次选择“运行——运行子过程/用户窗体”。

7/7

运行了用户窗体后，我想要创建一个名称为“2016”的工作薄。在文字框输入“2016”，点击命令按钮，生成名称为“2016”的工作薄。

注意事项

ThisWorkbook.Path \ WBookN .xls代码中\不能更换为“/”，否则会出错。

EXCELWPSWPS表格新建工作薄