发送给一些但不是所有人的VBA宏不起作用

时间:2017-04-25 22:13:04

标签: excel vba excel-vba

我在excel中有一个宏,我过去曾发送给某人并且它有效,但最后两个人遇到了同样的错误:

运行时错误1004 无法运行宏' CB.CopyKeyPress。'此宏可能在此工作簿中不可用,或者可能禁用所有宏。

他们向我保证,他们已经启用了宏,并且看起来前几行已经运行,并且它停在" CB.CopyKeyPress"阶段。不知道是什么原因可能导致他们遇到问题,而对我自己和其他人来说运行正常。我已经选择了代码的开头 - 它在已加星标的行(5行)

中失败
Sheets("Cadence").Select
Range("K10:Z34").Select
Selection.ClearContents
Range("AZ10:BG10").Select
**Application.Run "CB.CopyKeyPress"**
Range("BF3").Select
Selection.PasteSpecial Paste:=xlPasteValuesAndNumberFormats, Operation:= _
    xlNone, SkipBlanks:=False, Transpose:=False
Range("AB10:AI10").Select
Application.Run "CB.CopyKeyPress"
Range("AB3").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
    :=False, Transpose:=False
Range("C10").Select
Application.Run "CB.CopyKeyPress"
Sheets("Miles").Select
Range("B59").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
    :=False, Transpose:=False
Sheets("Cadence").Select
Range("E10").Select
Application.CutCopyMode = False

0 个答案:

没有答案