vba - VBA。这段代码有什么不正确的？

Question

搜索找到这样的代码

Sub Workbook_Activate()
Application.OnKey "+^{RIGHT}", "YourMacroName"
End Sub

但是，当我尝试时，我得到了

在此处输入图像描述

如何创建程序？

我做了这个

Sub YourMacroName()
   Selection.Copy
   Sheets("V").Select
End Sub

Sub Workbook_Activate()
Application.OnKey "+^{RIGHT}", "YourMacroName"
End Sub

得到同样的错误

什么是正确的代码？或者假人教程在哪里？找到了一些例子，但它们不起作用

我看到我的标签被修改为exceland excel-vba。但我不使用excel。使用金山办公

改为Application.OnKey "+^{RIGHT}", "YourMacroName"_.OnKey Key:="^+M", Procedure:="YourMacroName"

并得到

在此处输入图像描述

然后更改为OnKey Key:="^+M", Procedure:="YourMacroName"(removed .) 并得到错误Named argument not found。并被选中Key:=

score 1 · Accepted Answer

在“ThisWorkbook”中，您将运行由事件触发的代码。我建议你也把它放进去，Workbook_Open而不是Workbook_Activate因为你只需要存储一次快捷方式。

因此，在 VB 编辑器中，如果不是 (CTRL+R)，请打开“项目资源管理器”，然后在“Microsoft Excel 对象”文件夹中找到“ThisWorkbook”。这里的代码应该是这样的

Private Sub Workbook_Open()

    ' CTRL + SHIFT + RIGHT
    Application.OnKey "+^{RIGHT}", "YourMacroName"

End Sub

因为，在模块内（在项目资源管理器中，右键单击文件夹“模块”并选择插入 > 模块），放入宏“YourMacroName”

Sub YourMacroName()
   Selection.Copy
   Sheets("V").Select
End Sub

哦，您可能应该将您的程序重命名为“YourMacroName”以获得更明显的内容......

1 回答 1