如何在Excel中只在精确的工作簿中更改键盘快捷方式标准function

我有简单的事情。 我有一个工作簿，我只想在单元格中粘贴值。 于是我创build了一个macros：

Sub Wklej_w() On Error GoTo Skip: Selection.PasteSpecial Paste:=xlValues, Operation:=xlNone, SkipBlanks:=False, Transpose:=False Skip: End Sub 

并分配给CTRL + V快捷键。 它的作品 – 我只是粘贴单元格的值。 问题是，这makro在所有打开的工作簿中工作。 所以我试图添加：

 If ActiveWorkbook.Name <> nazwa_arkusza Then Exit Sub 

和

 Private Sub Workbook_Open() Public nazwa_arkusza As Integer nazwa_arkusza = ActiveWorkbook.Name End Sub 

但现在在其他工作簿，它不会粘贴。 根据工作簿是否处于活动状态，是否可以归档这两个function？

Answer 1

几乎在那里，尝试：

 Sub Wklej_w() If ActiveWorkbook.Name <> nazwa_arkusza Then ActiveSheet.Paste Else Selection.PasteSpecial Paste:=xlValues, Operation:=xlNone, SkipBlanks:=False, Transpose:=False End If End Sub