Если в вашем файле Excel сотни или тысячи гиперссылок, а удалять их по одной через контекстное меню — не вариант, существует как минимум 5 способов сделать это массово. Проблема чаще всего возникает при импорте данных из веб-источников, баз данных или после копирования таблиц с сайтов, где каждая ячейка автоматически преобразуется в кликабельную ссылку. В отличие от ручного удаления (правый клик → Удалить гиперссылку), массовые методы экономят часы работы, но требуют знания нюансов: некоторые из них удаляют только форматирование, другие — полностью очищают содержимое ячеек.
Например, при использовании функции ГИПЕРССЫЛКА() в формулах или после вставки данных из Power Query стандартные инструменты Excel могут не сработать. В этой статье разберём все актуальные методы — от встроенных опций до VBA-скриптов, — с учётом версий программы (включая Excel 365 и Excel 2019). Особое внимание уделим сохранению исходных данных и предотвращению ошибок типа #ЗНАЧ!, которые часто появляются после некорректного удаления ссылок.
Почему стандартное удаление не работает
Многие пользователи пытаются удалить гиперссылки через меню Главная → Редактирование → Очистить → Очистить гиперссылки, но сталкиваются с тем, что:
- 🔹 Опция
Очистить гиперссылкинедоступна (затенена серым) — это означает, что в выделенном диапазоне нет ссылок, созданных вручную, или они сгенерированы формулами. - 🔹 После очистки остаётся синее подчёркивание — так происходит, если ячейка отформатирована как гиперссылка, но сама ссылка удалена.
- 🔹 Удаляются только визуальные ссылки, а формулы типа
=ГИПЕРССЫЛКА("https://site.ru"; "Текст")остаются нетронутыми.
Причина кроется в механизме хранения гиперссылок в Excel. Программа различает:
- Статические гиперссылки — добавленные через
Вставка → Гиперссылкаили автоматически при копировании из браузера. - Динамические гиперссылки — созданные формулами (например,
ГИПЕРССЫЛКА()). - Форматирование под гиперссылку — когда текст окрашен в синий и подчёркнут, но не является кликабельным.
⚠️ Внимание: Если гиперссылки созданы черезPower QueryилиPower Pivot, их удаление стандартными методами приведёт к обрыву связей с источником данных. В этом случае требуется редактировать запрос.
Способ 1: Массовое удаление через «Найти и заменить»
Этот метод подходит для статических гиперссылок и работает во всех версиях Excel (начиная с 2010). Алгоритм:
- Выделите диапазон с гиперссылками (или нажмите
Ctrl + A, чтобы выбрать весь лист). - Нажмите
Ctrl + H, чтобы открыть окноНайти и заменить. - В поле
Найтивведите любой символ, который гарантированно есть в каждой гиперссылке (например,http://илиwww.). - Оставьте поле
Заменить напустым и нажмитеЗаменить всё.
Если гиперссылки созданы формулой ГИПЕРССЫЛКА(), этот способ не сработает — потребуется сначала преобразовать формулы в значения (Копировать → Специальная вставка → Значения).
Выделен правильный диапазон|Создана резервная копия файла|Проверено отсутствие важных формул с гиперссылками|Отключена фильтрация (если используется)
-->
Способ 2: Использование VBA-макроса для удаления всех ссылок
Для автоматизации процесса подходит макрос, который удаляет гиперссылки со всего листа или книги. Откройте редактор VBA (Alt + F11) и вставьте следующий код:
Sub DeleteAllHyperlinks()
Dim ws As Worksheet
For Each ws In ActiveWorkbook.Worksheets
ws.Hyperlinks.Delete
Next ws
End Sub
Этот скрипт:
- 🔹 Удаляет все гиперссылки во всех листах книги, включая скрытые.
- 🔹 Не затрагивает формулы и исходные данные.
- 🔹 Работает в Excel 2010–2023 и Excel 365.
⚠️ Внимание: Перед запуском макроса сохраните файл в формате.xlsm(с поддержкой макросов) и создайте резервную копию. В некоторых версиях Excel макрос может заблокироваться защитой — разрешите его выполнение вФайл → Параметры → Центр управления безопасностью.
-->
Способ 3: Очистка через «Специальную вставку»
Если гиперссылки появились после копирования данных из веб-страницы, их можно удалить без VBA:
- Выделите диапазон с гиперссылками.
- Скопируйте его (
Ctrl + C). - Щёлкните правой кнопкой по выделенной области и выберите
Специальная вставка → Значения(или нажмитеAlt + E → S → V). - Нажмите
Enter— гиперссылки исчезнут, а текст останется.
Этот метод удаляет все форматирование, включая цвета, шрифты и выравнивание. Если нужно сохранить оформление, используйте комбинацию:
Специальная вставка → Значения(удаляет ссылки).Специальная вставка → Форматы(восстанавливает оформление).
| Метод | Удаляет гиперссылки | Сохраняет данные | Сохраняет форматирование | Работает с формулами |
|---|---|---|---|---|
| Найти и заменить | ✅ Да | ✅ Да | ✅ Да | ❌ Нет |
| VBA-макрос | ✅ Да | ✅ Да | ✅ Да | ❌ Нет |
| Специальная вставка | ✅ Да | ✅ Да | ❌ Нет | ❌ Нет |
| Очистка формата | ❌ Нет (только визуально) | ✅ Да | ❌ Нет | ✅ Да |
Способ 4: Удаление форматирования гиперссылок
Если после удаления ссылок остаётся синее подчёркивание, это означает, что к ячейкам применён стиль Гиперссылка. Чтобы убрать его:
- Выделите проблемный диапазон.
- Перейдите на вкладку
Главная → Стили. - Нажмите на стрелочку в правом нижнем углу группы
Стили. - Выберите
Очиститьили примените другой стиль (например,Обычный).
Альтернативный способ — использовать Условное форматирование:
- Выделите диапазон →
Главная → Условное форматирование → Управление правилами. - Удалите все правила, связанные с гиперссылками (ищите условия типа
=ГИПЕРССЫЛКА(...)).
Как вернуть стандартный цвет гиперссылок
Если после очистки все ссылки стали чёрными, перейдите в Файл → Параметры → Дополнительно → Параметры отображения листа и сбросьте настройки цвета для гиперссылок.
Способ 5: Power Query для импортированных данных
Если гиперссылки появились после импорта данных через Power Query (Данные → Получить данные), их удаление на листе не поможет — они вернутся при обновлении. В этом случае:
- Откройте редактор
Power Query(Данные → Получить данные → Запросы и подключения). - Выберите запрос, который импортирует гиперссылки.
- В окне редактора найдите столбец со ссылками, кликните по его заголовку правой кнопкой и выберите
Заменить значения. - В поле
Значение для поискавведитеhttp://илиhttps://, а вЗаменить наоставьте пусто. НажмитеОК. - Сохраните и закройте редактор, затем обновите данные на листе.
Этот метод гарантирует, что гиперссылки не появятся снова после обновления. Если данные импортируются из веб-источника, можно также отключить преобразование ссылок в параметрах запроса:
= Web.Contents("URL", [ManualStatusHandling = {404}])
// Добавляем параметр для игнорирования гиперссылок
= Table.TransformColumns(#"Previous Step", {{"Column1", each Text.Replace(_, "http://", ""), type text}})
Частые ошибки и как их избежать
При массовом удалении гиперссылок пользователи часто сталкиваются с:
- 🔹 Потерей данных — происходит, если использовать
Очистить всёвместоОчистить гиперссылки. Всегда проверяйте, что выделен правильный диапазон. - 🔹 Ошибками в формулах — если гиперссылки были частью вычислений (например,
=ГИПЕРССЫЛКА(A1; B1)), их удаление нарушит логику таблицы. - 🔹 Зависанием Excel — при обработке больших файлов (100+ тыс. строк) отключите автоматический пересчёт (
Формулы → Параметры вычислений → Вручную).
Чтобы минимизировать риски:
- Создайте резервную копию файла (
Файл → Сохранить как). - Проверьте зависимые формулы (
Формулы → Зависимости формул → Влияющие ячейки). - Для больших файлов используйте
Power Queryили разбивайте данные на части.
Массовое удаление через "Найти и заменить"|VBA-макрос|Специальная вставка|Очистка формата|Другой способ
-->
FAQ: Ответы на частые вопросы
Можно ли удалить гиперссылки только с определённого листа, не затрагивая остальные?
Да. В VBA-макросе замените цикл For Each ws In ActiveWorkbook.Worksheets на конкретный лист:
ActiveWorkbook.Worksheets("Лист1").Hyperlinks.Delete
Или используйте метод Очистить гиперссылки только на нужном листе.
Почему после удаления гиперссылок остаются подчёркнутые синие слова?
Это означает, что к ячейкам применён стиль Гиперссылка. Удалите его через Главная → Стили → Очистить или измените цвет текста вручную.
Как удалить гиперссылки в защищённом листе?
Снимите защиту (Рецензирование → Снять защиту листа), удалите ссылки, затем верните защиту. Если пароль неизвестен, используйте VBA для снятия защиты (требуются права администратора).
Можно ли автоматизировать удаление гиперссылок при открытии файла?
Да. Поместите макрос в модуль ThisWorkbook с событием Workbook_Open():
Private Sub Workbook_Open()
Call DeleteAllHyperlinks
End Sub
Теперь ссылки будут удаляться при каждом открытии файла.
Как удалить гиперссылки в Excel Online?
В веб-версии Excel нет VBA и ограничен функционал. Используйте Найти и заменить (Ctrl + H) или копируйте данные в новый файл через Специальная вставка → Значения.
-->