我想用VBA管理嵌入在另一个Excel文件中的Excel文件。我可以在.docx文档中找到许多结果,但是我坚持使用.xlsx文档。
我的最后尝试是使用OLE对象,但停留在“ SaveAs”行(错误1004)。这是一个奇怪的部分:当我开始调试时,或者如果我使用F8逐步运行该程序,它确实可以运行,但是没有保存文件...
在此示例中,我将OLEObject称为“ TEST”:
Sub testOLE()
mPath = ActiveWorkbook.Path
For Each obj In Worksheets(1).OLEObjects
If obj.Name = "TEST" Then
obj.Verb
obj.Object.Activate
obj.Object.SaveAs mPath & "TEST_success.xlsx"
obj.Object.Close
End If
i = i + 1
Next
End Sub
我不明白如何将OLEObjects保存为.xlsx,您能帮我一下吗?
我刚刚成功使用obj.Object.SaveCopyAs
代替obj.Object.SaveAs
。
本文收集自互联网,转载请注明来源。
如有侵权,请联系[email protected] 删除。
我来说两句