Excel 工作簿。添加故障1004_Excel_Vba

Excel 工作簿。添加故障1004

excel vba

Excel 工作簿。添加故障1004,excel,vba,Excel,Vba,我得到了这个密码： Dim wb As Workbook Set wb = Workbooks.Add("J:\Planning\Sjablonen\Projectsjabloon.xlsm") 我使用表单控件元素运行代码，并得到以下错误：错误1004对象工作表的方法添加失败我使用的路径在本地服务器上，并且文件确实存在。这是一周前的工作。如果您尝试： Option Explicit Sub Macro1() Dim wk As Workbook Set wk = Wo

我得到了这个密码：

Dim wb As Workbook
Set wb = Workbooks.Add("J:\Planning\Sjablonen\Projectsjabloon.xlsm")

我使用表单控件元素运行代码，并得到以下错误：错误1004对象工作表的方法添加失败

我使用的路径在本地服务器上，并且文件确实存在。这是一周前的工作。

如果您尝试：

Option Explicit

Sub Macro1()

    Dim wk As Workbook

    Set wk = Workbooks.Add
    wk.SaveAs Filename:=("J:\Planning\Sjablonen\Projectsjabloon.xlsm")

End Sub

如果您尝试：

Option Explicit

Sub Macro1()

    Dim wk As Workbook

    Set wk = Workbooks.Add
    wk.SaveAs Filename:=("J:\Planning\Sjablonen\Projectsjabloon.xlsm")

End Sub

工作簿.Add

方法将采用可选的模板参数，但它必须是XlWBATemplate常量或带有路径的文件名。报告对此进行了更详细的解释。它没有明确指定文件必须是

.xltx

或

xltm

文件类型，这在

如果此参数是指定现有Microsoft Excel文件名的字符串，则将使用指定文件作为模板创建新工作簿

如果要将

Projectsjabloon.xlsm

用作模板，则需要将其另存为启用宏的模板

.xltm

文件。然后可以将其包含在可选模板参数中：

Set wb = Workbooks.Add("J:\Planning\Sjablonen\Projectsjabloon.xltm")

工作簿.Add