Jak wyodrębnić rzeczywiste adresy z hiperłączy w programie Excel?
Przypuśćmy, że masz szereg komórek zawierających hiperłącza, a teraz musisz zobaczyć prawdziwe miejsce docelowe hiperłączy i wyodrębnić je z hiperłączy, jak pokazano na zrzucie ekranu. Czy istnieją łatwe sposoby szybkiego rozwiązania tego problemu? Ten artykuł poprowadzi Cię do wyodrębnienia rzeczywistych adresów z wielu hiperłączy.
Wyodrębnij rzeczywiste adresy z hiperłączy za pomocą funkcji Edytuj hiperłącze
Tutaj Edytuj hiperłącze funkcja może pomóc w wyodrębnieniu podstawowego adresu URL dla każdego z tych hiperłączy i umieszczeniu tego rzeczywistego adresu w innej komórce. Możesz to zrobić:
1. Wybierz komórkę za pomocą hiperłącza i kliknij prawym przyciskiem myszy, z menu kontekstowego wybierz Edytuj hiperłączezobacz zrzut ekranu:
2. I Edytuj hiperłącze pojawi się okno dialogowe, wybierz i skopiuj (Ctrl + C) cały adres URL z pliku Adres pole okna dialogowego.
3. Następnie zamknij okno dialogowe i wklej rzeczywisty adres do dowolnej komórki.
Note: Za pomocą tej metody za każdym razem można wyodrębnić tylko jeden adres hiperłącza, ale jeśli trzeba wyodrębnić wiele hiperłączy, należy wielokrotnie stosować tę funkcję.
Wyodrębnij rzeczywiste adresy z hiperłączy za pomocą kodu VBA
W przypadku wielu hiperłączy powyższa metoda będzie żmudna i czasochłonna, więc poniższy kod VBA może pomóc szybko wyodrębnić wiele adresów z hiperłączy jednocześnie.
1. Przytrzymaj ALT + F11 klawisze, aby otworzyć Microsoft Visual Basic for Applications okno.
2. Kliknij wstawka > Modułi wklej następujący kod w oknie modułu.
Sub Extracthyperlinks()
'Updateby Extendoffice
Dim Rng As Range
Dim WorkRng As Range
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
For Each Rng In WorkRng
If Rng.Hyperlinks.Count > 0 Then
Rng.Value = Rng.Hyperlinks.Item(1).Address
End If
Next
End Sub3. Następnie naciśnij F5 klawisz do uruchomienia kodu i wyskakuje okno dialogowe, w którym można wybrać hiperłącza, które chcesz wyodrębnić prawdziwe adresy, patrz zrzut ekranu:
4. Następnie kliknij OK, a zawartość wybranej komórki została przekonwertowana na rzeczywiste adresy hiperłączy w oryginalnym zakresie. Zobacz zrzuty ekranu:
 |
 |
 |
Uzyskaj rzeczywiste adresy z hiperłączy za pomocą funkcji User Definde
Następująca funkcja zdefiniowana przez użytkownika może również wyodrębnić rzeczywisty adres URl z hiperłączy.
1. Przytrzymaj ALT + F11 klawisze, aby otworzyć Microsoft Visual Basic for Applications okno.
2. Kliknij wstawka > Modułi wklej następujący kod w Okno modułu.
Function GetURL(pWorkRng As Range) As String
'Updateby Extendoffice
GetURL = pWorkRng.Hyperlinks(1).Address
End Function
3. Zapisz kod i zamknij okno, wybierz pustą komórkę, aby wpisać tę formułę = GetURL (A2) (A2 to komórka, w której znajduje się hiperłącze) i naciśnij Wchodzę przycisk. Możesz zobaczyć, że prawdziwy adres hiperłącza jest wyodrębniany.
Wyodrębnij rzeczywiste adresy z hiperłączy za pomocą Kutools for Excel szybko i łatwo
Oto przydatne narzędzie o nazwie Kutools dla programu Excel, Z siedzibą w Konwertuj hiperłącza możesz szybko zająć się następującymi operacjami:
- Wyodrębnij rzeczywiste adresy z hiperłączy;
- Konwertuj tekst adresu URL na klikalne hiperłącza.
| Kutools dla programu Excel : z ponad 300 poręcznymi dodatkami Excela, które można wypróbować bez ograniczeń w ciągu 30 dni. |
Jeśli masz zainstalowany Kutools dla programu Excelwykonaj następujące czynności:
1. Wybierz zakres zawierający hiperłącza do wyodrębnienia.
2. Kliknij Kutools > Połączyć > Konwertuj hiperłączazobacz zrzut ekranu:
3, w Konwertuj hiperłącza okno dialogowe, wybierz Adresy hiperłączy zastępują zawartość komórki opcję i kliknij 
przycisk od Zakres wyników aby określić komórkę, w której ma zostać umieszczony wynik.
4. A następnie kliknij OK, rzeczywiste adresy zostały wyodrębnione z hiperłączy. Zobacz zrzut ekranu:
Note: Jeśli chcesz umieścić rzeczywiste adresy w oryginalnym zakresie, sprawdź Konwertuj zakres źródła.
Kliknij Konwertuj hiperłącza aby dowiedzieć się więcej o tej funkcji.
Pobierz i bezpłatną wersję próbną Kutools dla programu Excel teraz!
Demo: wyodrębnij rzeczywiste adresy z hiperłączy za pomocą Kutools for Excel
Podobne artykuły:
Jak przekonwertować tekst adresu URL na klikalne hiperłącze w programie Excel?
Najlepsze narzędzia biurowe
Zwiększ swoje umiejętności Excela dzięki Kutools for Excel i doświadcz wydajności jak nigdy dotąd. Kutools dla programu Excel oferuje ponad 300 zaawansowanych funkcji zwiększających produktywność i oszczędzających czas. Kliknij tutaj, aby uzyskać funkcję, której najbardziej potrzebujesz...
Karta Office wprowadza interfejs z zakładkami do pakietu Office i znacznie ułatwia pracę
- Włącz edycję i czytanie na kartach w programach Word, Excel, PowerPoint, Publisher, Access, Visio i Project.
- Otwieraj i twórz wiele dokumentów w nowych kartach tego samego okna, a nie w nowych oknach.
- Zwiększa produktywność o 50% i redukuje setki kliknięć myszką każdego dnia!
