Note: The other languages of the website are Google-translated. Back to English

Як гіперпосилати командну кнопку на URL-адресу в Excel?

В Excel нам може бути легко створити гіперпосилання для кнопки фігури, але чи намагалися ви коли-небудь створювати гіперпосилання на командну кнопку? Коли ви натискаєте кнопку команди, вона переходить на вказаний веб-сайт, як вам потрібно. У цій статті я представив кілька швидких і простих прийомів для вирішення цього завдання в Excel.

Гіперпосилання командної кнопки на URL-адресу з кодом VBA


стрілка синя права міхур Гіперпосилання командної кнопки на URL-адресу з кодом VBA

Щоб гіперпосилати на командну кнопку, виконайте такі дії:

1. Клацання Розробник > Insert > Кнопка керування (керування ActiveX), а потім намалюйте кнопку, як показано на наступному знімку екрана:

doc гіперпосилання командна кнопка 1

2. Вставивши командну кнопку, клацніть правою кнопкою миші та виберіть властивості з контекстного меню в властивості діалогове вікно натисніть кнопку Категорії та введіть повну адресу веб-сайту, на який потрібно посилатись Підпис текстове поле, див. знімок екрана:

doc гіперпосилання командна кнопка 2

3. Потім закрийте діалогове вікно та клацніть правою кнопкою миші вкладку аркуша, що містить командну кнопку, та виберіть Переглянути код з контекстного меню та у відкритому вікні Microsoft Visual Basic для додатків вікно, скопіюйте та вставте наступний код у порожній модуль:

Код VBA: гіперпосилання на командну кнопку:

Private Sub CommandButton1_Click()
ActiveWorkbook.FollowHyperlink _
Address:=CommandButton1.Caption
End Sub

doc гіперпосилання командна кнопка 3

примітки: У наведеному вище коді, CommandButton1 - це назва створеної командної кнопки, будь ласка, змініть її відповідно до своїх потреб.

4. А потім збережіть код і вийдіть з Режим дизайну, тепер, коли ви натискаєте кнопку команди, вона перейде на певну веб-сторінку.

чайові: Якщо підпис у командній кнопці не є URL-адресою, це лише текстовий рядок, як показано на наступному знімку екрана:

doc гіперпосилання командна кнопка 4

Ви можете застосувати наведений нижче код VBA для його досягнення:

Код VBA: гіперпосилання на командну кнопку:

Private Sub CommandButton1_Click()
ActiveWorkbook.FollowHyperlink _
Address:="https://www.extendoffice.com"
End Sub

doc гіперпосилання командна кнопка 5

примітки: У наведеному вище коді, CommandButton1 - це назва створеної командної кнопки, і ви повинні замінити адресу веб-сайту https://www.extendoffice.com на вашу власну URL-адресу.


Найкращі інструменти для підвищення продуктивності офісу

Kutools для Excel вирішує більшість ваших проблем і збільшує продуктивність на 80%

  • Повторне використання: Швидко вставте складні формули, діаграми і все, що ви використовували раніше; Шифрувати комірки з паролем; Створити список розсилки та надсилати електронні листи ...
  • Супер формула бар (легко редагувати кілька рядків тексту та формули); Макет читання (легко читати та редагувати велику кількість комірок); Вставте у відфільтрований діапазон...
  • Об’єднати клітинки / рядки / стовпці без втрати даних; Вміст розділених комірок; Об'єднати повторювані рядки / стовпці... Запобігання дублюючим клітинам; Порівняйте діапазони...
  • Виберіть Повторюваний або Унікальний Рядки; Виберіть Пусті рядки (усі клітинки порожні); Супер знахідка та нечітка знахідка у багатьох робочих зошитах; Випадковий вибір ...
  • Точна копія Кілька клітинок без зміни посилання на формулу; Автоматичне створення посилань на кілька аркушів; Вставте кулі, Прапорці та інше ...
  • Витяг тексту, Додати текст, Видалити за позицією, Видаліть пробіл; Створення та друк проміжних підсумків підкачки; Перетворення вмісту комірок та коментарів...
  • Супер фільтр (зберегти та застосувати схеми фільтрів до інших аркушів); Розширене сортування за місяцем / тижнем / днем, частотою та іншим; Спеціальний фільтр жирним, курсивом ...
  • Поєднайте робочі зошити та робочі аркуші; Об’єднати таблиці на основі ключових стовпців; Розділіть дані на кілька аркушів; Пакетне перетворення xls, xlsx та PDF...
  • Понад 300 потужних функцій. Підтримує Office / Excel 2007-2021 і 365. Підтримує всі мови. Легке розгортання на вашому підприємстві чи в організації. 30-денна безкоштовна пробна версія повних функцій. 60-денна гарантія повернення грошей.
вкладка kte 201905

Вкладка Office забезпечує інтерфейс з вкладками для Office і значно спрощує вашу роботу

  • Увімкніть редагування та читання на вкладках у Word, Excel, PowerPoint, Publisher, Access, Visio та Project.
  • Відкривайте та створюйте кілька документів на нових вкладках того самого вікна, а не в нових вікнах.
  • Збільшує вашу продуктивність на 50% та зменшує сотні клацань миші для вас щодня!
дно офісної таблиці
Коментарі (6)
Поки немає оцінок. Оцініть першим!
Цей коментар був мінімізований модератором на сайті
¿Cómo se podría hacer con un cuadro de texo? Es decir, que cualquier dirección web que se ponga en un cuadro de texto se puede abir con un boton
Грекіас
Цей коментар був мінімізований модератором на сайті
Дякую. Чи можете ви показати, як можна зв’язати URL-адресу з клітинки на аркуші?
Цей коментар був мінімізований модератором на сайті
Gracias me sirvió full.
Цей коментар був мінімізований модератором на сайті
Велике спасибі.
Цей коментар був мінімізований модератором на сайті
Kan je dit ook gebruiken om met een druk van de knop naar bovenaan een sheet te gaan?
Цей коментар був мінімізований модератором на сайті
Привіт, Рейвер,
Щоб натиснути кнопку для переходу вгору аркуша, застосуйте наведений нижче код:
Private Sub CommandButton1_Click()
ActiveSheet.Range("A1").Select
End Sub

Будь ласка, спробуйте, сподіваюся, це допоможе вам!
There are no comments posted here yet
Залишайте свої коментарі
Публікація як гість
×
Оцініть цю публікацію:
0   Персонажі
Рекомендовані місця

Слідуй за нами

Copyright © 2009 - WWW.extendoffice.com. | Всі права захищені. На основі ExtendOffice. | Карта сайту
Microsoft та логотип Office є товарними знаками або зареєстрованими товарними знаками Microsoft Corporation у США та / або інших країнах.
Захищений Sectigo SSL