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

Як змінити кілька шляхів гіперпосилання одночасно в Excel?

З певною метою ви можете створити декілька гіперпосилань для своїх даних на аркуші, і всі гіперпосилання пов’язані з одним і тим же шляхом до файлу або адресою, але зараз вам потрібно замінити цей шлях гіперпосилання іншою адресою одночасно. Щоб змінити шлях гіперпосилань окремо, можна витратити багато часу, чи є швидкий спосіб вирішити цю проблему?

Змінюйте кілька шляхів гіперпосилання одночасно на аркуші з кодом VBA

Змінюйте кілька шляхів гіперпосилання одночасно на аркуші / книзі / декількох аркушах / виділеннях з дивовижною функцією


Змінюйте кілька шляхів гіперпосилання одночасно на аркуші з кодом VBA

Припустимо, у вас є список даних із тими самими гіперпосиланнями, що показані на наведеному нижче знімку екрана, а за допомогою коду VBA ви можете швидко замінити старий шлях до файлу або адресу на аркуші новим.

1. Утримуйте клавішу ALT + F11 і відкриває Вікно Microsoft Visual Basic для програм.

2. Натисніть Insert > Модуліта вставте наступний макрос у Вікно модуля.

Код VBA: змініть кілька шляхів гіперпосилання одночасно

Sub ReplaceHyperlinks()
'Updateby Extendoffice
Dim Ws As Worksheet
Dim xHyperlink As Hyperlink
Dim xOld As String, xNew As String
xTitleId = "KutoolsforExcel"
Set Ws = Application.ActiveSheet
xOld = Application.InputBox("Old text:", xTitleId, "", Type:=2)
xNew = Application.InputBox("New text:", xTitleId, "", Type:=2)
Application.ScreenUpdating = False
For Each xHyperlink In Ws.Hyperlinks
    xHyperlink.Address = Replace(xHyperlink.Address, xOld, xNew)
Next
Application.ScreenUpdating = True
End Sub

3. Потім натисніть F5 клавішу для запуску цього коду, а також підказку, що дозволяє ввести вашу стару адресу гіперпосилання в Старий текст коробці. Дивіться знімок екрана:

4. Клацання OK, а ще одне підказка вискакує, щоб нагадати вам про введення нової адреси гіперпосилання, яку ви хочете використовувати.

5. А потім клацніть OK, все ті ж старі адреси гіперпосилань були замінені відразу на нові. Дивіться скріншоти:


Змінюйте кілька шляхів гіперпосилання одночасно на аркуші / книзі / декількох аркушах / виділеннях з дивовижною функцією

Якщо ви хочете замінити шляхи гіперпосилання із виділення, декількох аркушів, поточного робочого завдання чи кількох книг, як ви могли це зробити? С Знайти і замінити особливість Kutools для Excel, ви можете швидко впоратися з цим завданням.

Примітка:Щоб застосувати це Знайти і замінити По-перше, ви повинні завантажити Kutools для Excel, а потім швидко та легко застосувати функцію.

після установки Kutools для Excel, будь ласка, зробіть так:

1. Клацання Кутулс > навігація, див. скріншот:

2. У відкритому навігація панель, клацніть Знайти і замінити вкладка, в Знайти і замінити панель, клацніть заміщати , а потім виконайте такі операції:

  • Введіть старий текст гіперпосилання, який ви хочете знайти, у Знайти те, що , а потім введіть новий текст гіперпосилання, який потрібно замінити, у Замінити текстове вікно;
  • Вкажіть область, де ви хочете знайти та замінити шлях гіперпосилання з В випадаючий список;
  • Потім виберіть Гіперпосилання у спадному меню Перегляд;
  • Нарешті клацніть Знайти все кнопки, усі відповідні комірки, що містять конкретний текст гіперпосилання, були перераховані в нижньому полі списку.

3. Потім натисніть кнопку замінити всі , старі шляхи гіперпосилання були змінені відразу на нові, див. знімок екрана:

Клацніть, щоб безкоштовно завантажити Kutools для Excel!


Більше відносних статей:

  • Витяг фактичних адрес із гіперпосилань
  • Припустимо, у вас є ряд комірок, які містять гіперпосилання, і тепер вам потрібно побачити справжнє призначення гіперпосилань та витягти їх із гіперпосилань, як показано на наступному знімку екрана. Чи є прості способи швидко вирішити цю проблему?
  • Перетворення URL-адрес зображень на фактичні зображення в Excel
  • Якщо у вас є список адрес URL-адрес зображень у стовпці A і зараз, ви хочете завантажити відповідні картинки із URL-адрес і відобразити їх у сусідньому стовпці B, як показано на лівому скріншоті. Як в Excel можна швидко та легко витягувати фактичні зображення із URL-адрес зображень?
  • Перетворити текст URL-адреси на гіперпосилання, яке можна натиснути в Excel
  • Припустимо, на вашому аркуші є кілька URL-адрес, але вони не пов’язані, і тепер вам потрібно перетворити всі не пов’язані URL-адреси на гіперпосилання, що можна натиснути, як показано на наступних скріншотах. Звичайно, ви можете двічі клацнути по одному, щоб зробити їх клікабельними, але це займе багато часу, якщо URL-адрес буде багато. Як ви могли автоматично перетворити кілька не зв’язаних URL-адрес на гіперпосилання, що можна натиснути, в Excel?
  • Відкрийте конкретну сторінку PDF-документа з гіперпосилання Excel
  • Коли ви прив'язуєте комірку до файлу PDF, як правило, ви переходите на першу сторінку файлу PDF, коли натискаєте, щоб відкрити гіперпосилання. Якщо вам потрібно безпосередньо перейти на певну сторінку PDF-файлу, натиснувши гіперпосилання, ця стаття може зробити вам послугу.

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

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% та зменшує сотні клацань миші для вас щодня!
дно офісної таблиці
Коментарі (45)
Поки немає оцінок. Оцініть першим!
Цей коментар був мінімізований модератором на сайті
Вражаюче це заощадило мої зусилля.
Цей коментар був мінімізований модератором на сайті
мені це подобається, ви заощадите мені масу роботи.
Цей коментар був мінімізований модератором на сайті
Привіт, не могли б ви дати мені код VB, якщо мені потрібно змінити посилання в Powerpoint замість Excel? Спасибі
Цей коментар був мінімізований модератором на сайті
Привіт, здається, це працює чудово, але деякі символи (наприклад, "\" і "%"). У моєму випадку у мене є адреси гіперпосилань, як-от [../../../../../../Application%20Data/Microsoft/2012/Relacom%20Uki-Kantvik-Tallinna-Pietari-Uki_saate151012.xls] і Мені потрібно розпочати [../../../../../../Application%20Data/Microsoft/] від адреси з сотень посилань. Початки ланок однакові, а кінці різні. У вас є якісь слушні поради?
Цей коментар був мінімізований модератором на сайті
Спасибі!!!! :lol: це дуже допомогло.
Цей коментар був мінімізований модератором на сайті
Як я можу змінити це, щоб оновити гіперпосилання, які посилаються на посилання в книзі, а не на зовнішні веб-адреси?
Цей коментар був мінімізований модератором на сайті
Просто потрібно те саме, спробуйте такі зміни: Sub ReplaceHyperlinks() 'Updateby20140220 Dim Wb As Workbook Dim Ws As Worksheet Dim xHyperlink As Hyperlink Dim xOld As String, xNew As String xTitleId = "CambiaLink" 'Set Wsheet Set = Application. Application.ActiveWorkbook xOld = Application.InputBox("Старий текст:", xTitleId, "", Тип:=2) xNew = Application.InputBox("Новий текст:", xTitleId, "", Тип:=2) Для кожного Ws У Wb.Worksheets 'Application.ScreenUpdating = False для кожного xHyperlink У Ws.Hyperlinks Debug.Print ("voy " & xHyperlink.SubAddress) xHyperlink.SubAddress = Replace(xHyperlink.SubAddress, xUld Next, xOld Application). Кінець суб
Цей коментар був мінімізований модератором на сайті
mauricio- Ви чудові! Спасибі! Крім того, для іншого звіту мені знадобиться просто оновити посилання лише на визначених вкладках, чи це можливо?
Цей коментар був мінімізований модератором на сайті
Дякую дякую дякую!!!!!!!! ти врятував мене на 2 дні роботи тут
Цей коментар був мінімізований модератором на сайті
Чи є спосіб змінити кілька гіперпосилань «текст для відображення» одночасно?
Цей коментар був мінімізований модератором на сайті
Дякую за блискучу програму. Працює, ЯК ШАРМ... "WLC"
Цей коментар був мінімізований модератором на сайті
Блискуче! Дуже дякую!!!!
Цей коментар був мінімізований модератором на сайті
Привіт, хлопці, чого мені не вистачає, я отримую "Помилка компіляції - змінна не визначена" для XTitleId в Excel 2013 :cry:
Цей коментар був мінімізований модератором на сайті
Не хвилюйтеся, я зрозумів це і встановив як рядок
Цей коментар був мінімізований модератором на сайті
це дуже допомогло, дуже дякую
Цей коментар був мінімізований модератором на сайті
Це найкорисніша стаття Excel, яку я коли-небудь зустрічав. У мене було багато проблем, коли гіперпосилання у файлі були пошкоджені, або я хочу перемістити деякі файли з гіперпосиланнями, а оновлення завжди було серйозною проблемою. Мій програміст Excel не мав простого рішення. Це працює бездоганно. Я дуже вдячний - дякую!
Цей коментар був мінімізований модератором на сайті
Оце Так! Це заощадило мені ДУЖЕ ЧАСУ. Ти неймовірний. Дякую, що поділились!
Цей коментар був мінімізований модератором на сайті
Це блискуче. Ви врятували мені ДУЖЕ ЧАСУ. сьогодні. Дякую, що поділились!
Цей коментар був мінімізований модератором на сайті
Велике спасибі за розвиток цього! У мене був користувач, який створив купу гіперпосилань на кількох вкладках (принаймні кілька сотень), і якимось чином у них був шлях до його папки AppData\Roaming на своєму диску c, а не до мережевої папки. Я зміг використати ваш сценарій VBA, щоб видалити цю частину коду посилання, і тепер все працює. Заощадив нам, ймовірно, тиждень на оновлення, і мені знадобилося менше 2 хвилин на впровадження!
Цей коментар був мінімізований модератором на сайті
Дивовижний. Працювало як чарівність у Excel 2013, не потрібно налаштовувати, на відміну від подібних виправлень, які я бачив для цієї проблеми. Велике ДЯКУЮ. Заощадив величезний головний біль і години часу.
Цей коментар був мінімізований модератором на сайті
Я спробував запустити його на гіперпосиланнях, які містять посилання на інші папки, але це не спрацювало. Як я можу змінити це, щоб оновити гіперпосилання, які посилаються на папки на жорсткому диску, а не на зовнішні веб-адреси?
There are no comments posted here yet
Load More
Залишайте свої коментарі
Публікація як гість
×
Оцініть цю публікацію:
0   Персонажі
Рекомендовані місця

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

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