Question

我写了宏（在personal.xlsb上，因为我想在每个Excel工作表中使用它）并为其分配快捷方式。不幸的是我得到了一条错误信息 - 出了什么问题（对象变量未设置错误91）：

Public Sub wklej_specjalnie() 

    'wklej_specjalnie Makro ' 
    'Klawisz skrótu: Ctrl+Shift+v '

    On Error Resume Next

    ActiveSheet.ActiveCell.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks:=False, Transpose:=False 

End Sub

Answer 1

没有必要指定ActiveSheet; ActiveCell是活动工作表上的活动单元格。这应该适合你：

Public Sub wklej_specjalnie() 

    'wklej_specjalnie Makro ' 
    'Klawisz skrótu: Ctrl+Shift+v '

    On Error Resume Next

    ActiveCell.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks:=False, Transpose:=False 

End Sub

在Excel 2007中粘贴特殊功能

1 个答案: