Как найти все гиперссылки в excel

Если у вас есть таблица Excel с большим количеством гиперссылок, и если вы хотите удалить несколько из них, то было бы утомительной задачей найти и удалите каждую гиперссылку вручную. Вы можете сделать это вручную, если файл небольшой, и у него меньше ссылок. Но, что, если число гиперссылок, которые вы хотите удалить, больше? Если вы это ищете, вы попали на правильную страницу. В этой статье я расскажу вам, как легко найти и заменить гиперссылки в Excel . Это работает в каждой версии Excel.

В конце этой статьи вы узнаете

• Как найти и удалить все гиперссылки в Excel
• Как найти и удалить гиперссылки с определенным текстом и
• Удалите все гиперссылки за один раз.

Итак, без каких-либо адо мы перейдем к нему.

Найти и удалить все гиперссылки в Excel

Выбрать ячейки, из которых вы хотите удалить гиперссылки. Скажем, у меня есть образцы данных из 10 сайтов со ссылками на несколько сайтов.

Теперь я хочу удалить все гиперссылки, доступные в электронной таблице. Для этого я нажимаю « CTRL + F» на моей клавиатуре и откроет диалоговое окно « Найти и заменить ».

Нажмите « Внизу внизу кнопки `

Теперь нажмите стрелку вниз с кнопкой < Формат «и выберите« Выбрать формат из ячейки ».

Выберите ячейку с гиперссылкой, и она отобразит предварительный просмотр (слева от кнопки «Формат») с гиперссылкой.

Нажмите кнопку « Найти все », и она отобразит все гиперссылки в Excel.

Вы можете выбрать одну или несколько гиперссылок из результата с помощью кнопок CTRL или Shift .

Чтобы удалить их, щелкните правой кнопкой мыши по выделенным ячейкам и выберите « Удалить гиперссылки «.

Найти и удалить гиперссылки с определенным текстом

В этом разделе мы увидим, как удалить гиперссылки в Excel, связанные с конкретным текстом. Скажем, у меня есть образцы данных продуктов, и некоторые из продуктов были связаны более одного раза. Итак, если я хочу гиперссылки, у которых есть текст « Продукт 3 ».

Нажмите « CTRL + F» , и откроется диалоговое окно «Найти и заменить».

В « Найти, что » введите текстовое поле текст « Продукт 3 ». Нажмите кнопку со стрелкой « Формат » и выберите « Выбрать формат из ячейки ».

Выберите ячейку с «Продуктом 3», и она отобразит предварительный просмотр (слева от кнопки «Формат») и нажмите кнопку «Найти все».

Он отобразит список гиперссылок с продуктом 3.

Выберите результат, удерживая клавишу Ctrl или Shift. Чтобы удалить их, щелкните правой кнопкой мыши по выделенным ячейкам и выберите «Удалить гиперссылки».

Удалить все гиперссылки за один раз

Чтобы удалить все гиперссылки в электронной таблице Excel, нажмите CTRL + A или нажмите треугольник, присутствующий в верхней части листа, чтобы выбрать всю электронную таблицу.

Теперь щелкните правой кнопкой мыши в любом месте листа и выберите «Удалить гиперссылки». Это приведет к удалению всех гиперссылок, присутствующих во всей электронной таблице.

Это простой способ найти и удалить гиперссылки в Excel.

Взгляните на дополнительные советы и подсказки Excel, чтобы получить максимальную отдачу от Excel.

Когда мы используем рабочий лист, возможно, мы создаем в нем много гиперссылок, и иногда нам нужно знать, на что ссылаются тексты. Если вы будете щелкать по ним один за другим, это будет утомительно и займет много времени. Если мы сможем перечислить все гиперссылки с текстами и адресами гиперссылок на листе, нам будет легко проверить все гиперссылки в Excel.

Список всех выбранных гиперссылок с кодом VBA

Извлечь все фактические адреса из гиперссылок с помощью Kutools for Excel

Список всех выбранных гиперссылок с кодом VBA

1. Выберите диапазон, содержащий гиперссылки, которые вы хотите перечислить.

2. Нажмите Застройщик>Визуальный Бейсик, Новый Microsoft Visual Basic для приложений появится окно, щелкните Вставить>Модули, и введите в модуль следующий код:

Option Explicit
Private Function GetHyperAddy(Cell As Range) As String
On Error Resume Next
GetHyperAddy = Cell.Hyperlinks.Item(1).Address
If Err.Number <> 0 Then GetHyperAddy = "None"
On Error GoTo 0
End Function
Sub DistillHyperlinks()
Dim HyperAddy As String, cl As Range, wsTarget As Worksheet, clSource As Range
Application.ScreenUpdating = False
Set clSource = Selection
On Error Resume Next
Set wsTarget = Sheets("Hyperlink List")
If Err.Number <> 0 Then 
Set wsTarget = Worksheets.Add
With wsTarget
.Name = "Hyperlink List"
With .Range("A1")
.Value = "Location"
.ColumnWidth = 20
.Font.Bold = True
End With
With .Range("B1")
.Value = "Displayed Text"
.ColumnWidth = 25
.Font.Bold = True
End With
With .Range("C1")
.Value = "Hyperlink Target"
.ColumnWidth = 40
.Font.Bold = True
End With
End With
Set wsTarget = Sheets("Hyperlink List")
End If
On Error GoTo 0
For Each cl In clSource
HyperAddy = GetHyperAddy(cl)
If Not HyperAddy = "None" Then
With wsTarget.Range("A65536").End(xlUp).Offset(1, 0)
.Parent.Hyperlinks.Add Anchor:=.Offset(0, 0), _
Address:="", SubAddress:=(cl.Parent.Name) & "!" & (cl.Address)
.Offset(0, 1).Value = cl.Text
.Hyperlinks.Add Anchor:=.Offset(0, 2), Address:=HyperAddy
End With
End If
Next cl
wsTarget.Select
End Sub

3. Затем нажмите кнопку для запуска кода. И все гиперссылки будут отображаться на новом листе с именем Список гиперссылок. Смотрите скриншот:

Извлечь все фактические адреса из гиперссылок с помощью Kutools for Excel

Для Kutools for ExcelАвтора Конвертировать гиперссылки функция, вы можете быстро извлечь реальные адреса из гиперссылок.

После установки Kutools for Excel, пожалуйста, сделайте следующее Бесплатная загрузка Kutools for Excel Теперь )

1. Выберите гиперссылки, по которым вы хотите извлечь реальные места назначения.

2. Затем нажмите Кутулс > Ссылка > Конвертировать гиперссылки, см. снимок экрана:

3. В Конвертировать гиперссылки диалоговое окно, выберите Адреса гиперссылок заменяют содержимое ячейки из файла Тип преобразования раздел, а затем укажите ячейку, в которую вы хотите поместить результат под Диапазон результатов раздел, см. снимок экрана:

4. Затем нажмите OK все реальные адреса были извлечены из гиперссылок, см. снимок экрана:

Внимание: Преобразовать исходный диапазон: извлеченные результаты будут расположены в исходном диапазоне ячеек, если вы отметите эту опцию.

Бесплатная загрузка Kutools for Excel Теперь

Связанные статьи:

Как быстро удалить все гиперссылки в Excel?

Комментарии (6)