VBA运行时错误1004代码..方法saveas作用于对象_workbook时失败(2010版excel)
Sub savetofile()Application.ScreenUpdating = FalseDim folder As Stringfolder = ThisWorkbook.Path & "\班级成绩表"If Len(Dir(folder, vbDirectory)) = 0 Then MkDir folderDim sht As WorksheetFor Each sht In Worksheets sht.Copy ActiveWorkbook.SaveAs folder & "\" & sht.Name & ".xls" ActiveWorkbook.CloseNextApplication.ScreenUpdating = TrueEnd Sub
我想把成绩表,七(1)班至七(9)班的每个工作表单独变成一个工作簿.程序只生成一个,就报错1004..求解
Application.ScreenUpdating = False
on error resume next '忽略错误，继续执行
Dim folder As String
folder = ThisWorkbook.Path & "\班级成绩表"
If Len(Dir(folder, vbDirectory)) = 0 Then MkDir folder
Dim sht As Worksheet
For Each sht In thisworkbook.Worksheets
if sht.name<>"成绩表" then '判断表名
sht.Copy
ActiveWorkbook.SaveAs folder & "\" & sht.Name & ".xlsx"
ActiveWorkbook.Close
end if
Next
Application.ScreenUpdating = True
End Sub
VBA运行时错误1004代码..方法saveas作用于对象_workbook时失败(2010...
Application.ScreenUpdating = False on error resume next '忽略错误，继续执行 Dim folder As String folder = ThisWorkbook.Path & "\\班级成绩表"If Len(Dir(folder, vbDirectory)) = 0 Then MkDir folder Dim sht As Worksheet For Each sht In thisworkbook.Worksheets if sht.name<>"成绩表"...
windows10EXCEL提示运行时错误1004如何解决
解决方法一：单击文件——选项——信任中心——打开“信任中心”对话框，宏设置——勾选“信任对VBA工程对象模型的访问”。再次运行，就不会出现运行时错误1004提示。解决方法二：查看下工具--宏--安全性，安全级别降低，可靠发行商保留空白。如果新建文档也会出现上述情况，试打开EXCEL后，工具--宏--VB...
...时错误1004:方法open 作用于对象workbooks时失败?
解决方法一：打开电脑中的excel之后，使用鼠标单击左上角的文件按钮，接着依次点击“选项”-“信任中心”。打开信任中心设置界面之后，在左侧单击“宏设置”选项卡，随后使用鼠标勾选开发人员宏设置下方的：“信任对VBA工程对象模型的访问”选项！完成之后保存以上设置即可！解决方法二：1、运行excel之后在工...
...时错误1004方法SaveAs作用于对象_Workbook时失败请假高手怎么修改...
thisworkbook.saveas (thisworkbook.path & "\\123.xls")如果想把其他被当前宏打开的工作簿WK（工作簿的变量名）另存为123.xls（如保存到当前目录下）WK.saveas (thisworkbook.path & "\\123.xls")
vba运行时错误1004是怎么回事?
vba运行时错误1004 应用程序定义或对象定义错误是设置错误造成的，解决方法为：1、先打开一个文件。2、单击文件―选项―信任中心―信任中心设置。3、打开“信任中心”对话框 宏设置。4、勾选“信任对VBA工程对象模型的访问” 点击确定。就不会出现运行时错误1004提示。
...方法’SaveAs‘作用于对象’-workbook‘时失败!!
E盘 或 E:\\收据\\ 这个目录不存在 问题补充：“工具”菜单下“选项”对话框“安全性”选项卡中的“保存时从文件属性中删除个人信息”不要选中就没提示了
ExcelVBA运行时错误1004的解决方法
这段代码是测试当前VBA版本的：Sub 获取VBA版本()MsgBox Application.VBE.Version End Sub 当按F5键，就报：运行时错误1004。经老师指点，单击文件——选项——信任中心——打开“信任中心”对话框，宏设置——勾选“信任对VBA工程对象模型的访问”。再次运行，就不会出现运行时错误1004提示。后来在微软...
VBA运行时错误1004 worksheet时失败
可以如下方式解决： 1、当按F5键，就报：运行时错误1004。可以这样操作，单击文件――选项――信任中心――打开“信任中心”对话框
VBA运行时错误1004的意思是什么呢?
VBA运行时错误1004通常是由于Excel中的代码尝试对不存在的工作表或范围进行操作而引起的。这个错误的确切原因可能因情况而异，但通常是由以下几种情况引起的：1. 代码中引用了不存在的工作表或范围。2. 代码尝试在受保护的工作表或范围上进行操作，但未输入正确的密码。3. 代码尝试在只读工作簿上进行写...
...方法’SaveAs‘作用于对象’-workbook‘时失败!!
ActiveWorkbook.SaveAs Filename:=ThisWorkbook.Path & "\\b.xls"
