Как вывести всплывающее окно сообщения при нажатии на определенную ячейку в 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% и сократите сотни кликов мышью ежедневно!