在特定单元格上按Enter键时如何运行宏

Question

我当前正在尝试创建一个工具，该工具将在单元格B4上按下Enter键时调用/运行另一个宏/子。

单元格B4将成为搜索字段。每当有人在此字段中键入内容并在键盘上输入击键时，我都希望运行另一个名为“ searchcontains”的宏

我尝试使用此代码，但不确定如何特别定义B3单元：

Application.OnKey“〜”，“搜索包含”

Answer 1

您也可以尝试以下代码： 1.打开VBA编辑器 2.转到工作表VBA编辑器 3.选择工作表并更改事件 4.复制代码

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Row = 4 And Target.Column = 2 Then
    'The function will be called only if the cell has a value
    If ActiveSheet.Cells(4, 2).Value <> "" Then
       'Call the function here
       Call sample_function(ActiveSheet.Cells(4, 2).Value)
    End If
End If

End Sub



Sub sample_function(input_String As String)

MsgBox "You input: " & input_String, vbInformation

End Sub