Question

我制作了一个宏，调用保存在共享驱动器上的另一个宏。我从上一个问题的建议中得到了帮助。它正在处理我本地驱动器上的文件，但是只要我从共享驱动器中的文件打开它就会停止工作。

宏名称为mymacro.xla

这些是代码：

Dim i As AddIn

Set i = Application.AddIns.Add("M:\nit\USER\nitin kumar\NQK\macro\run1.2.xla", True)

i.Installed = True

我创建了一个按钮，其代码如下：

Dim CoBa As CommandBar
Dim Ctlconst As CommandBarControl
On Error Resume Next

Set CoBa = Application.CommandBars.Add(Name:="Quote Daily Report", temporary:=True)

With CoBa
    Set Ctlconst = .Controls.Add(Type:=msoControlButton)

    With Ctlconst
        .Caption = "Lexington Macro"
        .Style = msoButtonIconAndCaptionBelow
        .OnAction = "Accounts_Summary"
        .FaceId = 483
        .TooltipText = "NITIN"
    End With
    .Visible = True
    .Position = msoBarBottom
End With

没有任何建议会有很大的帮助。

Answer 1

最省力的解决方案是在添加之前在本地复制XLA。

根本原因可能是一些事情，锁定，只读文件夹或安全限制。最好不要乱用它，这也会让你遇到一系列潜在的问题，例如： - 如果你在某人使用xla时更新xla会怎么样？

excel宏在vba中调用另一个excel宏

1 个答案: