Как быстро изменить сразу несколько гиперссылок в Excel?
Для определенных целей вы могли создать несколько гиперссылок для данных на листе, причем все они ведут на один и тот же Путь к файлу или адрес. Однако теперь вам нужно заменить этот путь гиперссылки другим адресом одновременно. Изменение путей гиперссылок по отдельности может занять много времени. Существует ли быстрый способ решения этой задачи?
Одновременное изменение нескольких путей гиперссылок на листе с помощью кода VBA
Одновременное изменение нескольких путей гиперссылок на листе с помощью кода VBA
Предположим, у вас есть список данных с одинаковыми гиперссылками, как показано на снимке экрана ниже. С помощью кода VBA вы можете быстро заменить старый путь к файлу или адрес на листе новым.
1.Удерживая клавиши ALT + F11, откройте окно Microsoft Visual Basic для приложений.
2. Нажмите Вставка > Модуль и вставьте следующий макрос в окно Модуль.
Код 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. Нажмите кнопку ОК, после чего появится ещё одно диалоговое окно с запросом на ввод нового адреса гиперссылки, который вы хотите использовать.
5. Затем нажмите кнопку ОК, и все старые адреса гиперссылок будут заменены новыми одновременно. См. снимки экрана:
|  |  |
Одновременное изменение нескольких путей гиперссылок на листе / в книге / на нескольких листах / в выделенном фрагменте с помощью удивительной функции
Хотите заменить пути гиперссылок в выделенном фрагменте, на нескольких листах, в текущей книге или сразу в нескольких книгах? С помощью функции Поиск и замена из набора Kutools для Excel вы легко справитесь с этой задачей!
После установки Kutools для Excelвыполните следующие действия:
1. Нажмите Kutools > Навигация. См. снимок экрана:
2. В открывшейся области Навигация перейдите на вкладку Поиск и замена, в области Поиск и замена выберите вкладку Заменить и выполните следующие действия:
- Введите старый текст гиперссылки, который нужно найти, в поле Найти, а затем — новый текст для замены в поле Заменить на.
- Выберите область для поиска и замены пути гиперссылки из раскрывающегося списка В пределах.
- Затем в раскрывающемся списке «Искать в» выберите пункт «Гиперссылки».
- Наконец, нажмите кнопку Найти все, и все соответствующие ячейки, содержащие указанный текст гиперссылки, появятся в нижнем списке.
3. Затем нажмите кнопку Заменить все, и старые пути гиперссылок мгновенно заменятся новыми. См. снимок экрана:
Нажмите, чтобы бесплатно скачать пробную версию Kutools для Excel!
Другие связанные статьи:
- Извлечение фактических адресов из гиперссылок
- Предположим, у вас есть диапазон ячеек с гиперссылками, и вы хотите быстро увидеть их реальные адреса назначения и извлечь их, как показано на следующем снимке экрана. Существуют ли простые способы для быстрого решения этой задачи?
- Преобразование URL-адресов изображений в реальные изображения в Excel
- Если у вас в столбце A есть список URL-адресов изображений и вы хотите загрузить соответствующие изображения по этим ссылкам, чтобы отобразить их в соседнем столбце B (как показано на левом снимке экрана), как в Excel можно быстро и легко получить реальные изображения из этих URL-адресов?
- Преобразование текстовых URL в кликабельные гиперссылки в Excel
- Предположим, на вашем листе есть несколько URL-адресов, но они не являются активными ссылками. Теперь вы хотите преобразовать все эти неактивные URL в кликабельные гиперссылки, как показано на следующих снимках экрана. Конечно, можно дважды щёлкнуть каждый из них по очереди, чтобы сделать их кликабельными — но если URL-адресов много, это займёт уйму времени. Как автоматически превратить сразу несколько неактивных URL в кликабельные гиперссылки в Excel?
- Открытие определенной страницы PDF-документа из гиперссылки в Excel
- Когда вы связываете ячейку с файлом PDF, при нажатии на гиперссылку обычно открывается первая страница этого PDF-документа. Если же вам нужно сразу перейти на определённую страницу PDF-файла при клике по гиперссылке, данная статья поможет вам в этом.
Лучшие инструменты повышения продуктивности в 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-дневная полнофункциональная пробная версия— без регистрации и кредитной карты
- Лучшее соотношение цены и качества— экономия по сравнению с покупкой отдельных надстроек