Как запустить макрос при нажатии клавиши ввода на определенной ячейке

Question

В настоящее время я пытаюсь создать инструмент, который будет вызывать / запускать другой макрос / сабвуфер при нажатии клавиши ввода в ячейке B4.

Ячейка B4 будет полем поиска. Всякий раз, когда кто-то вводит что-то в это поле и нажимает клавишу ввода, вводится на их клавиатуре, я хочу, чтобы запускался другой макрос с именем "searchcontains"

Я пытался использовать этот код, но я не уверен, как конкретно определить ячейку B3:

Application.OnKey "~", "searchcontains"

Answer 1

Вы также можете попробовать этот код: 1. Откройте редактор VBA 2. Перейти к рабочему листу VBA Editor 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