Question

我已经录制了一个宏，它基本上打开了其他工作表，并在保存和关闭它们之前将数据复制并粘贴到它们中。它对我来说非常有效，但是当同事试图使用相同的文件运行相同的宏时它会失败。

它打开了第一个工作表，但随后停在第一个命令--Application.Run“ConnectChartEvents。有什么想法吗？

ChDir "\\dstm8307vpfs\EQData\EQUITYSWAPS\Client Folders\Proshares"
    Workbooks.Open Filename:= _
        "\\dstm8307vpfs\EQData\EQUITYSWAPS\Client Folders\Proshares\INTL_SWAPMTM_UBS.xlsm" _
        , UpdateLinks:=0
    Application.Run "ConnectChartEvents"
    ActiveWindow.ScrollWorkbookTabs Position:=xlLast
    Sheets("Allocations").Select
    Range("D3:D38").Select
    Selection.ClearContents
    ActiveWindow.ScrollWorkbookTabs Position:=xlFirst
    Sheets("UltraShort FTSE Xinhua China 50").Select
    Range("G1048576").Select
    Selection.End(xlUp).Select
    ActiveCell.Offset(1, 0).Range("A1").Select
    ActiveCell.FormulaR1C1 = "='[DIVS - test.xlsm]Sheet1'!R13C2"
    ActiveCell.Select
    Selection.Copy
    Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
        :=False, Transpose:=False
    Application.CutCopyMode = False
    Sheets("Execution Commissions").Select
    ActiveWorkbook.Save
    ActiveWindow.Closesheet

Answer 1

如果Bloomberg加载项被禁用，或者您在带有加载项的计算机上录制宏并尝试在没有加载项的计算机上运行它，则会收到此错误消息。

宏打开其他工作表不适用于其他用户

1 个答案: