Как щелкнуть или дважды щелкнуть ячейку, чтобы открыть указанную пользовательскую форму в Excel?

Удобно открывать указанную пользовательскую форму, просто щелкнув или дважды щелкнув ячейку в Excel. Но как этого добиться? Эта статья предлагает метод для помощи.

Щелкните или дважды щелкните ячейку, чтобы открыть указанную пользовательскую форму с помощью кода VBA

Щелкните или дважды щелкните ячейку, чтобы открыть указанную пользовательскую форму с помощью кода VBA

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

1. Откройте лист с ячейками, которые вы хотите щелкнуть или дважды щелкнуть, чтобы открыть пользовательскую форму.

2. Щелкните правой кнопкой мыши вкладку листа, а затем выберите Вид Код из контекстного меню. См. скриншот:

3. В открывающемся окне Microsoft Visual Basic for Applications скопируйте и вставьте следующий код VBA в окно кода.

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
'Updateby20171226
    If Not Application.Intersect(Target, Range("A1:B9")) Is Nothing Then
        UserForm1.Show
    End If
End Sub

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
'Updateby20171226
    If Not Application.Intersect(Target, Range("A1:B9")) Is Nothing Then
        Cancel = True
        UserForm1.Show
    End If
End Sub

Примечание: В коде A1:B9 — это диапазон ячеек, на основе которого вы откроете пользовательскую форму. А UserForm1 — это имя пользовательской формы, которую вы откроете, щелкнув или дважды щелкнув ячейки. Пожалуйста, измените его в зависимости от ваших потребностей.

4. Нажмите клавиши Alt + Q, чтобы закрыть окно Microsoft Visual Basic for Applications.

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

Связанные статьи:

• Как дважды щелкнуть ячейку, чтобы открыть указанный лист в Excel?
• Как добавить галочку в ячейку двойным щелчком в Excel?
• Как автоматически добавить/ввести текущую дату/время в ячейку двойным щелчком в Excel?
• Как дважды щелкнуть ячейку и прибавить 1 к значению этой ячейки в Excel?
• Как вызвать календарь при нажатии на определенную ячейку в Excel?