Как открыть заданную пользовательскую форму в Excel, просто щёлкнув или дважды щёлкнув по ячейке?
Открывать указанную пользовательскую форму простым или двойным щелчком по ячейке в Excel — невероятно удобно. Но как этого добиться? В этой статье описан метод, который поможет вам решить эту задачу.
Откройте указанную пользовательскую форму, щёлкнув или дважды щёлкнув ячейку с помощью кода VBA
Откройте указанную пользовательскую форму, щёлкнув или дважды щёлкнув ячейку с помощью кода VBA
Выполните следующие шаги, чтобы настроить открытие указанной пользовательской формы в Excel при щелчке или двойном щелчке по ячейке.
1. Откройте лист, содержащий ячейки, по которым вы будете щёлкать или дважды щёлкать для открытия пользовательской формы.
2. Щёлкните правой кнопкой мыши по ярлыку листа и выберите в контекстном меню пункт Просмотреть код. См. снимок экрана:
3. В открывшемся окне Microsoft Visual Basic for Applications скопируйте и вставьте следующий код VBA в окно кода.
Код VBA: щелкните ячейку, чтобы открыть указанную пользовательскую форму в Excel:
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
Код VBA: дважды щелкните ячейку, чтобы открыть указанную пользовательскую форму в Excel:
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?
Лучшие инструменты повышения продуктивности в Office
Раскройте весь потенциал Excel с помощью Kutools для Excel и ощутите эффективность как никогда раньше.Kutools для Excel предлагает более 300 расширенных функций для повышения продуктивности и Экономия времени.Нажмите здесь, чтобы получить нужную Вам функцию…
Office Tab добавляет в Office вкладки и значительно упрощает Вашу работу
- Включите редактирование и чтение во вкладках в Word, Excel, PowerPoint, Publisher, Access, Visio и Project.
- Открывайте и создавайте несколько документов во вкладках одного окна — вместо того чтобы использовать отдельные окна.
- Повышает вашу продуктивность на 50 % и экономит сотни кликов мышью каждый день!
Все надстройки Kutools — один установщик
Kutools for Office — набор надстроек для Excel, Word, Outlook и PowerPoint, а также Office Tab Pro, идеально подходящий командам, работающим с разными приложениями Office.
- Единый комплект— надстройки для Excel, Word, Outlook и PowerPoint + Office Tab Pro
- Один установщик, одна лицензия— настройка занимает считанные минуты (готово для MSI)
- Лучше работать вместе— оптимизированная продуктивность во всех приложениях Office
- 30-дневная полнофункциональная пробная версия— без регистрации и кредитной карты
- Лучшее соотношение цены и качества— экономия по сравнению с покупкой отдельных надстроек