excel - 通过双击单元格从工作表中调用宏

Question

我想通过双击 Sheet2 中的单元格来调用 Module1 中的宏 (Rpt1)。我不确定该怎么做。我似乎从 Sheet2 执行双击事件，但我不知道如何调用 Module1 中的宏。

Answer 1

您需要将此代码粘贴到您的 SHEET 代码中:

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
    Const clickADDRESS As String = "A1" '<--- or whatever cell you want it to be

    If Not Intersect(Target, Me.Range(clickADDRESS)) Is Nothing Then
        Call Rpt1
    End If

End Sub

它将调用模块代码中的宏(我的示例)

Sub Rpt1()

   MsgBox "This worked"

End Sub

通过工作表代码，这是一个说明: