vbaopen(VBAopen作用于对象时失败)

拳击047

本篇文章给大家谈谈vbaopen，以及VBAopen作用于对象时失败对应的知识点，希望对各位有所帮助，不要忘了收藏本站喔。

本文目录一览：

EXCEL VBA 所有工作薄OPEN事件

提问者采纳如果，我说的是如果，不存在workbook的open事件代码和Sheet1的Activate事件，那么工作簿被隐藏很有可能是曾经使用GetObject *** 打开过并保存了。这种情况下，只要正常打开（比如双击）后，在VBA的立即窗口输入一次workbooks("文件名全称").Windows(1).Visible=True，并保存一次，以后就能正常了如果，存在Open事件的代码，那就酌情修改取消隐藏

VBA以值, 执行Open, Save As, Rename

更新1:

Hi CW Wan

多谢你的回应

我曾尝试用录制巨集

但只董皮毛

Take Course VBA 班上的 Miss 又话等下星期在班上讨论 ... 远水不能救近火

蒙各位赐教。

更新2:

HI

Calvin 蒙赐教

快夹妥

一矢中的

Thank you very mush !!!

Try this... Dim sCstNo as string

sDnNo as string

sDnRec as string

sDat as strring sCstNo = [B2] sDnNo = [C3] sDnRec = [D10] sDat = [A33] Workbooks.Open Filename:= sCstNo ".xls" Workbooks.Open Filename:= sDnRec ".xls" Windows(sCstNo ".xls").Activate ActiveSheet.Move Before:=Workbooks(sDnRec).Sheets(1) Windows(sDnRec ".xls").Activate ActiveSheet.Name = sDnNo ActiveWorkbook.SaveAs Filename:= sCstNo "-" sDat ".xls"

FileFormat:=xlNormal

Password:=""

WriteResPassword:=""

_ ReadOnlyRemended:=False

CreateBackup:=False Calvin Lee

[email protected] P.S. you have to make sure you want to ActiveSheet.MOVE Before:=Workbooks(sDnRec).Sheets(1) or ActiveSheet.COPY Before:=Workbooks(sDnRec).Sheets(1)

Hi CW Wan

多谢你的回应

我曾尝试用录制巨集

但只董皮毛

Take Course VBA 班上的 Miss 又话等下星期在班上讨论 ... 远水不能救近火

蒙各位赐教。

有无尝试用录制巨集（Record Macro）

excel的VBA里面的WorkBooks.Open的问题

通常情况下，我们应该避开重复打开文件，如果你略懂VBA，请使用下面代码测试：

将你的WOrkBooks.Open("D:\xx.xls")

改成如下：

Dim Wb as WorkBook '定义一个wb工作簿变量

On Error Resume Next '容错

Set wb = WOrkbooks("xx.xls")

'先引用xx.xls工作簿，如果该工作簿没有打开，那么将发生错误9；如果已经打开，将跳过下面这句打开工作簿的代码！

If Err.Number = 9 Then Set wb = WorkBooks.Open("D:\xx.xls") '捕获错误9，打开相关工作簿

vbaopen(VBAopen作用于对象时失败),第1张

vba中open作用于对象失败

解决 *** 一：

打开电脑中的excel之后，使用鼠标单击左上角的文件按钮，接着依次点击“选项”-“信任中心”。打开信任中心设置界面之后，在左侧单击“宏设置”选项卡，随后使用鼠标勾选开发人员宏设置下方的：“信任对VBA工程对象模型的访问”选项！完成之后保存以上设置即可！

解决 *** 二：

1、运行excel之后在工具选项卡中单击“宏”选项，接着选择“安全性”选项！打开安全性设置界面之后将安全级别全部降低，可以使用开发商来保留空白。

2、若是在使用excel的过程中新建文档也会提示这个错误，那么我们可以在高级选项卡下方单击“宏”选项中的“VB编辑器”选项！

解决 *** 三：

有的用户在使用的过程中用到了一些错误的代码或是公式，这种情况下也会出现1004错误代码。此时就需要我们对所有的代码以及公式进行检查了！

关于vbaopen和VBAopen作用于对象时失败的介绍到此就结束了，不知道你从中找到你需要的信息了吗 ？如果你还想了解更多这方面的信息，记得收藏关注本站。