Как отобразить окно сообщения при щелчке по определённой ячейке в Excel?
Цель данной статьи — продемонстрировать, как отобразить окно сообщения при щелчке по определённой ячейке в Excel.
Отображение окна сообщения при щелчке по определённой ячейке с помощью кода VBA
Отображение окна сообщения при щелчке по определённой ячейке с помощью кода VBA
Выполните следующие действия, чтобы при щелчке по определённой ячейке на листе отображалось окно сообщения.
1. Перейдите на лист, содержащий ячейку, по которой должно отображаться окно сообщения при щелчке. Щёлкните правой кнопкой мыши по ярлыку листа и выберите в контекстном меню Просмотреть код.
2. В окне Microsoft Visual Basic for Applications скопируйте и вставьте приведённый ниже код VBA в окно кода.
Код VBA: отображение окна сообщения при щелчке по определённой ячейке
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Not Intersect(Target, Range("A1:B10")) Is Nothing Then _
MsgBox "You have select cell " & Target.Address & vbCrLf & "Please input a number", vbInformation, "Kutools for Excel"
End Sub
Примечания:
1). Код «A1:B10» означает, что окно сообщения появится при щелчке по любой ячейке в этом диапазоне.
2). «Вы выбрали ячейку» и «Пожалуйста, введите данные» — это текст сообщений, отображаемых в окне.
Измените их так, как вам удобно.
3. Нажмите клавиши Alt + Q одновременно, чтобы закрыть окно Microsoft Visual Basic for Applications.
Теперь при щелчке по любой ячейке в диапазоне A1:B10 появится окно сообщения, как показано на снимке экрана ниже.
Связанные статьи:
- Как настроить таймер для окна сообщения в Excel, чтобы оно автоматически закрывалось через заданное время?
- Как скопировать текст из окна сообщения в Excel?
- Как отобразить окно сообщения при активации или открытии определённого листа в Excel?
- Как отобразить окно сообщения со значениями диапазона или отдельных ячеек в 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-дневная полнофункциональная пробная версия— без регистрации и кредитной карты
- Лучшее соотношение цены и качества— экономия по сравнению с покупкой отдельных надстроек