Перейти к содержимому

Как добавить всплывающую подсказку при наведении мыши на определенную фигуру в Excel?

Author: Siluvia Last Modified: 2025-08-07

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

Добавление всплывающей подсказки к определенной фигуре с помощью гиперссылки
Добавление всплывающей подсказки к определенной фигуре с помощью кода VBA


Добавление всплывающей подсказки к определенной фигуре с помощью гиперссылки

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

1. Щелкните правой кнопкой мыши фигуру, к которой вы хотите добавить всплывающую подсказку, затем выберите Создать гиперссылку из контекстного меню. См. скриншот:

Right click the shape, and click Hyperlink

2. В диалоговом окне Создать гиперссылку нажмите кнопку ScreenTip. В открывшемся диалоговом окне Установка ScreenTip для гиперссылки введите текст подсказки, который будет отображаться при наведении курсора мыши на фигуру. Наконец, нажмите кнопку ОК. См. скриншот:

enter the screen tip text in the Insert Hyperlink dialog box

3. Когда вы вернетесь в диалоговое окно Создать гиперссылку, нажмите кнопку Закладка. Затем введите A1 в поле ссылки на ячейку в диалоговом окне Выбор места в документе и, наконец, нажмите кнопку ОК.

click the Bookmark, enter A1 into the textbox

4. Нажмите кнопку ОК в диалоговом окне Создать гиперссылку, чтобы завершить создание гиперссылки.

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

the screen tip displaying when hovering over the shape

a screenshot of kutools for excel ai

Раскройте магию Excel с Kutools AI

  • Умное выполнение: Выполняйте операции с ячейками, анализируйте данные и создавайте диаграммы — всё это посредством простых команд.
  • Пользовательские формулы: Создавайте индивидуальные формулы для оптимизации ваших рабочих процессов.
  • Кодирование VBA: Пишите и внедряйте код VBA без особых усилий.
  • Интерпретация формул: Легко разбирайтесь в сложных формулах.
  • Перевод текста: Преодолейте языковые барьеры в ваших таблицах.
Улучшите возможности Excel с помощью инструментов на базе ИИ. Скачать сейчас и испытайте беспрецедентную эффективность!

Добавление всплывающей подсказки к определенной фигуре с помощью кода VBA

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

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

2. В окне Microsoft Visual Basic for Applications скопируйте приведенный ниже код VBA в окно Код.

Код VBA 1: Добавление всплывающей подсказки к определенной фигуре

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
'Updated by Extendoffice 2018/3/30
    If Target.Address = Range("A1").Address Then
        Call MoveRow
    End If
End Sub

3. Нажмите Вставить > Модуль. Затем введите приведенный ниже код VBA в окно Модуль.

Код VBA 2: Добавление всплывающей подсказки к определенной фигуре

Sub Text()
'Updated by Extendoffice 2018/3/30
    Dim xShape As Shape
    Dim xRg As Range
    On Error Resume Next
    Application.EnableEvents = False
    Set xShape = ActiveSheet.Shapes("Rectangle 4")
    If Not xShape Is Nothing Then
        ActiveSheet.Hyperlinks.Add xShape, "", "A1", ScreenTip:="Click to run Macro "
    End If
    If ActiveSheet.Hyperlinks(1).SubAddress = "A1" Then
        Call MoveRow
    End If
    Application.EnableEvents = True
End Sub

copy and paste the vba codes into the module

Примечания:

1). Пожалуйста, замените «Нажмите, чтобы запустить макрос» и «Прямоугольник 4» на текст вашей подсказки и имя определенной фигуры.
2). Замените "MoveRow" в строке "Call MoveRow" на имя макроса, которое вы назначили фигуре.

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


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

Лучшие инструменты для повышения продуктивности в Office

🤖 Kutools AI Aide: Переворот в анализе данных на основе: Интеллектуальное выполнение   |  Сгенерировать код  |  Создать Пользовательские Формулы  |  Анализ данных и генерация диаграмм  |  Вызов Kutools Functions
Популярные функции: Найти, выделить или отметить дубликаты   |  Удалить пустые строки   |  Объединить столбцы или ячейки без потери данных   |   Округлить...
Супер ПОИСК: VLookup с несколькими критериями    VLookup с несколькими значениями  |   Многолистовой поиск   |   Распознавание нечетких соответствий ....
Расширенный раскрывающийся список: Быстро создать раскр. список   |  Зависимый раскрывающийся список   |  Множественный выбор в раскрывающемся списке ....
Менеджер столбцов: Добавить определенное количество столбцов  |  Переместить столбцы  |  Переключить статус видимости скрытых столбцов  |  Сравнить диапазоны и столбцы ...
Рекомендуемые функции: Сетка фокусировки   |  Дизайн листа   |   Улучшенная строка формулы    Управление книгой и листами   |  Библиотека автотекста (Auto Text)   |  Выбор даты   |  Объединить данные   |  Шифрование/Расшифровка ячеек    Отправить письмо по списку   |  Супер фильтр   |   Специальный фильтр (фильтр по жирному/курсиву/зачеркиванию...) ...
Топ–15 наборов инструментов: 12 текстовых инструментов (Добавить текст, Удалить определенные символы, ...)   |   50+ типов диаграмм (Диаграмма Ганта, ...)   |   40+ практических формул (Расчет возраста на основе даты рождения, ...)   |   19 инструментов вставки (Вставить QR-код, Вставить изображение из пути, ...)   |  12 инструментов преобразования (Преобразовать в слова, Конвертация валюты, ...)   |  7 инструментов объединения и разделения (Расширенное объединение строк, Разделить ячейки, ...)   |   ... и многое другое
Используйте Kutools на вашем предпочитаемом языке – поддерживаются английский, испанский, немецкий, французский, китайский и более40 других языков!

Повысьте свои навыки работы в Excel с Kutools для Excel и ощутите новую эффективность. Kutools для Excel предлагает более300 расширенных функций для повышения продуктивности и экономии времени.  Щелкните здесь, чтобы получить наиболее нужную вам функцию...


Office Tab добавляет вкладочный интерфейс в Office, делая вашу работу значительно проще

  • Включите редактирование и чтение во вкладках в Word, Excel, PowerPoint, Publisher, Access, Visio и Project.
  • Открывайте и создавайте несколько документов во вкладках одного окна, а не в новых окнах.
  • Увеличьте свою продуктивность на50% и сократите сотни кликов мышью ежедневно!