Как удалить гиперссылку в Excel, но сохранить текст в ячейке: 5 проверенных методов

Гиперссылки в Microsoft Excel — полезный инструмент для быстрого перехода к веб-страницам, файлам или другим листам книги. Но иногда они мешают: отвлекают синим подчёркиванием, сбивают форматирование или просто не нужны после импорта данных. Основная проблема — при удалении ссылки стандартным способом (через контекстное меню) часто исчезает и само значение ячейки. Как же сохранить текст, но убрать кликабельную ссылку?

Эта статья покрывает все актуальные способы — от базовых (горячие клавиши, меню) до продвинутых (формулы, VBA). Мы разберём нюансы для разных версий Excel (2010–2023, Microsoft 365), а также покажем, как автоматизировать процесс для сотен ячеек. Особое внимание уделим скрытым ловушкам: почему иногда текст всё равно пропадает и как этого избежать.

Если вы работаете с большими таблицами, где гиперссылки добавлены массово (например, после экспорта из Google Sheets или базы данных), ручное удаление займёт часы. Здесь пригодятся пакетные методы — макрос или функция HYPERLINK с обратной логикой. А для тех, кто боится потерять данные, мы подготовили чек-лист проверки перед удалением.

1. Удаление ссылки через контекстное меню (самый простой способ)

Этот метод подходит для единичных ячеек и не требует знания формул или макросов. Алгоритм работает во всех версиях Excel, включая Excel Online (с ограничениями).

Пошаговая инструкция:

1. Выделите ячейку (или диапазон ячеек) с гиперссылкой.
2. Щёлкните правой кнопкой мыши и выберите в меню «Удалить гиперссылку» (Remove Hyperlink).
3. Готово! Текст останется, а синее подчёркивание и кликабельность исчезнут.

⚠️ Внимание: В Excel Online опция «Удалить гиперссылку» может отсутствовать. В этом случае используйте метод с горячими клавишами (раздел 2) или копированием через блокнот (раздел 3).

Если пункт меню неактивен (серого цвета), проверьте:

• 🔹 Выделена ли ячейка точно с гиперссылкой (а не с обычным текстом).
• 🔹 Нет ли защиты листа (Рецензирование → Снять защиту листа).
• 🔹 Не является ли файл read-only (открыт в режиме «только чтение»).

2. Горячие клавиши для быстрого удаления

Для пользователей, предпочитающих клавиатурные сокращения, есть два варианта:

Способ 1: Сочетание Ctrl + Shift + F9

Это универсальная комбинация для удаления всех гиперссылок на активном листе. Она работает в Excel 2013–2023 и Microsoft 365, но имеет нюанс:

• 🔹 Удаляет только гиперссылки, не затрагивая значения ячеек.
• 🔹 Не работает в Excel Online и мобильной версии.
• 🔹 Отменяется через Ctrl + Z, но если после нажатия были другие действия — восстановление невозможно.

Способ 2: Alt + H + M + R (последовательно)

Альтернативный метод через ленточное меню:

1. Выделите ячейку(и) с гиперссылкой.
2. Нажмите Alt — появятся подсказки клавиш.
3. Последовательно нажмите H (вкладка «Главная»), M («Редактирование»), R («Удалить гиперссылку»).

3. Копирование через блокнот (100% сохранность данных)

Этот метод гарантированно сохраняет текст, даже если другие способы дают сбой. Подходит для любых версий Excel, включая Excel Online и мобильные приложения.

Инструкция:

1. Выделите ячейку(и) с гиперссылкой и скопируйте (Ctrl + C).
2. Вставьте данные в обычный блокнот (Notepad в Windows, TextEdit в macOS). Это удалит всё форматирование, включая ссылки.
3. Скопируйте текст из блокнота обратно в Excel (Ctrl + V).

⚠️ Внимание: Метод сбрасывает все форматы (шрифт, цвет, выравнивание). Если нужно сохранить оформление, используйте специальную вставку (Ctrl + Alt + V → «Значения»).

Когда этот способ незаменим:

• 🔹 Гиперссылки добавлены через формулу HYPERLINK (стандартные методы не работают).
• 🔹 Файл открыт в Excel Online или мобильном приложении с ограниченными функциями.
• 🔹 Нужно очистить данные от всех типов форматирования (не только ссылок).

4. Использование функции «Специальная вставка»

Метод позволяет сохранить значения ячеек, но удалить гиперссылки и другое форматирование. Подходит для обработки больших диапазонов.

Пошаговая инструкция:

1. Выделите ячейки с гиперссылками и скопируйте их (Ctrl + C).
2. Щёлкните правой кнопкой по пустой области листа и выберите «Специальная вставка» (Paste Special).
3. В открывшемся окне выберите «Значения» (Values) и нажмите OK.

Альтернативный путь:

Используйте комбинацию Ctrl + Alt + V, затем нажмите V (для «Значений») и Enter.

Сравнение с другими методами:

Создать резервную копию файла|Проверить наличие скрытых гиперссылок (Ctrl+F → .)|Выделить все ячейки с ссылками (Ctrl+A → специальный фильтр)|Убедиться, что нет важных формул с HYPERLINK-->

5. Удаление ссылок, созданных функцией HYPERLINK

Если гиперссылки добавлены через формулу =HYPERLINK("URL";"Текст"), стандартные методы не сработают — нужно извлечь текст из формулы. Здесь поможет комбинация функций или макрос.

Способ 1: Формула для извлечения текста

Добавьте рядом столбец с формулой:

=ПСТР(B2;НАЙТИ("""";B2;НАЙТИ("""";B2)+1)+1;ДЛСТР(B2)-НАЙТИ("""";B2;НАЙТИ("""";B2)+1))

Где B2 — ячейка с формулой HYPERLINK. Формула ищет текст между вторыми кавычками.

Способ 2: Замена через «Найти и заменить»

1. Нажмите Ctrl + H (замена).
2. В поле «Найти» введите =HYPERLINK(*.
3. В поле «Заменить на» оставьте пусто или введите = (если нужно сохранить как текст).
4. Нажмите «Заменить всё».

⚠️ Внимание: После замены формулы превратятся в текст. Чтобы вернуть вычисляемые значения, скопируйте результаты и выполните специальную вставку → «Значения».

Критичный нюанс: если в формуле HYPERLINK использовались динамические ссылки (например, на ячейки), после удаления они превратятся в статический текст. Восстановить динамику будет невозможно!

6. Автоматизация через VBA (для продвинутых пользователей)

Если гиперссылок сотни или тысячи, ручное удаление неэффективно. Макрос на VBA решит задачу за секунды.

Код для удаления всех гиперссылок на активном листе:

Sub RemoveAllHyperlinks()
Dim ws As Worksheet
Set ws = ActiveSheet
ws.Hyperlinks.Delete
MsgBox "Все гиперссылки на листе """ & ws.Name & """ удалены!", vbInformation
End Sub

Sub RemoveHyperlinksKeepFormat()
Dim cell As Range
For Each cell In Selection
If cell.Hyperlinks.Count > 0 Then
cell.Value = cell.Text
cell.Hyperlinks.Delete
End If
Next cell
End Sub