Przejdź do głównej zawartości

Jak przekonwertować kilka tekstowych adresów URL na aktywne hiperłącza w programie Excel?

Autor: Xiaoyang Ostatnia modyfikacja: 2020-06-03

Jeśli masz listę adresów URL, które są zwykłym tekstem, jak możesz aktywować te tekstowe adresy URL do klikalnych hiperłączy, jak pokazano na poniższym zrzucie ekranu?

doc aktywuj hiperłącza 1

Przekonwertuj kilka tekstowych adresów URL na aktywne hiperłącza za pomocą formuł

Przekonwertuj kilka tekstowych adresów URL na aktywne hiperłącza za pomocą kodu VBA

Konwertuj kilka tekstowych adresów URL na aktywne hiperłącza Kutools for Excel


strzałka niebieski prawy bąbelek Przekonwertuj kilka tekstowych adresów URL na aktywne hiperłącza za pomocą formuł

Dwukrotne kliknięcie komórki, aby aktywować hiperłącza jeden po drugim, zmarnuje dużo czasu, tutaj mogę wprowadzić dla Ciebie kilka formuł, wykonaj następujące czynności:

Wprowadź tę formułę: = HIPERŁĄCZE (A2; A2) do pustej komórki, w której chcesz wyprowadzić wynik, a następnie przeciągnij uchwyt wypełniania w dół, aby zastosować tę formułę do żądanych komórek, a wszystkie tekstowe adresy URL zostały przekonwertowane na aktywne hiperłącza, zobacz zrzut ekranu:

doc aktywuj hiperłącza 2


strzałka niebieski prawy bąbelek Przekonwertuj kilka tekstowych adresów URL na aktywne hiperłącza za pomocą kodu VBA

Poniższy kod VBA również może pomóc w rozwiązaniu tego zadania, wykonaj następujące czynności:

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.

Kod VBA: przekonwertuj kilka tekstowych adresów URL na aktywne hiperłącza:

Sub activateHyperlinks()
'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
    Application.ActiveSheet.Hyperlinks.Add Rng, Rng.Value
Next
End Sub

3. Następnie naciśnij F5 klucz do uruchomienia tego kodu i pojawia się okienko zachęty przypominające o wybraniu komórek, które chcesz przekonwertować na klikalne hiperłącza, patrz zrzut ekranu:

doc aktywuj hiperłącza 3

4. A następnie kliknij OK przycisk, adresy URL w postaci zwykłego tekstu zostały przekonwertowane na aktywne hiperłącza, patrz zrzut ekranu:

doc aktywuj hiperłącza 4


strzałka niebieski prawy bąbelek Konwertuj kilka tekstowych adresów URL na aktywne hiperłącza Kutools for Excel

Oto przydatne narzędzie-Kutools dla programu Excel, Z siedzibą w Konwertuj hiperłącza możesz szybko i jedno i drugie przekonwertować kilka tekstowych adresów URL na klikalne hiperłącza i wyodrębnij prawdziwe adresy hiperłączy z ciągu tekstowego 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. 

Po zainstalowaniu Kutools dla programu Excel, zrób tak:

1. Zaznacz komórki zawierające tekstowe adresy URL, które chcesz aktywować.

2. Następnie kliknij Kutools > Połączyć > Konwertuj hiperłączazobacz zrzut ekranu:

3, w Konwertuj hiperłącza okno dialogowe, wybierz Zawartość komórki zastępuje adresy hiperłączy opcja pod Konwertuj typ a następnie sprawdź Konwertuj źródło zakres, jeśli chcesz umieścić rzeczywiste adresy w oryginalnym zakresie, zobacz zrzut ekranu:

doc aktywuj hiperłącza 6

4. Następnie kliknij Ok przycisk, a tekstowe adresy URL zostały aktywowane od razu, patrz zrzut ekranu:

doc aktywuj hiperłącza 4

Note: Jeśli chcesz umieścić wynik w innej komórce zamiast oryginalnej komórki, usuń zaznaczenie Konwertuj źródło zakres i wybierz komórkę, w której chcesz wyprowadzić wynik z zakresu wyników, jak pokazano na poniższym zrzucie ekranu:

doc aktywuj hiperłącza 7

Kliknij, aby pobrać Kutools dla programu Excel i bezpłatną wersję próbną teraz!

Najlepsze narzędzia biurowe

🤖 Pomocnik AI Kutools: Zrewolucjonizuj analizę danych w oparciu o: Inteligentne wykonanie   |  Wygeneruj kod  |  Twórz niestandardowe formuły  |  Analizuj dane i generuj wykresy  |  Wywołaj funkcje Kutools...
Popularne funkcje: Znajdź, wyróżnij lub zidentyfikuj duplikaty   |  Usuń puste wiersze   |  Łącz kolumny lub komórki bez utraty danych   |   Okrągły bez wzoru ...
Super wyszukiwanie: Wiele kryteriów VLookup    Wiele wartości VLookup  |   Przeglądanie pionowe na wielu arkuszach   |   Wyszukiwanie rozmyte ....
Zaawansowana lista rozwijana: Szybko twórz listę rozwijaną   |  Zależna lista rozwijana   |  Lista rozwijana wielokrotnego wyboru ....
Menedżer kolumn: Dodaj określoną liczbę kolumn  |  Przesuń kolumny  |  Przełącz stan widoczności ukrytych kolumn  |  Porównaj zakresy i kolumny ...
Polecane funkcje: Fokus siatki   |  Widok projektu   |   Duży pasek formuły    Menedżer skoroszytów i arkuszy   |  Biblioteka zasobów (Automatyczny tekst)   |  Selektor dat   |  Połącz arkusze   |  Szyfruj/odszyfruj komórki    Wysyłaj e-maile według listy   |  Super filtr   |   Specjalny filtr (filtruj pogrubienie/kursywa/przekreślenie...) ...
15 najlepszych zestawów narzędzi12 Tekst Tools (Dodaj tekst, Usuń znaki, ...)   |   50 + Wykres rodzaje (Wykres Gantta, ...)   |   40+ Praktyczne Wzory (Oblicz wiek na podstawie urodzin, ...)   |   19 Wprowadzenie Tools (Wstaw kod QR, Wstaw obraz ze ścieżki, ...)   |   12 Konwersja Tools (Liczby na słowa, Przeliczanie walut, ...)   |   7 Połącz i podziel Tools (Zaawansowane wiersze łączenia, Podział komórki, ...)   |   ... i więcej

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...

Opis


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!
Comments (4)
Rated 5 out of 5 · 1 ratings
This comment was minimized by the moderator on the site
LA OPCION 2:
Convierta un montón de URL de texto en hipervínculos activos con código VBA

ANDA PERFECTO!
GRACIAS!
Rated 5 out of 5
This comment was minimized by the moderator on the site
Tak for input, men jeg kunne ikke få konverteringen til at virke.

Den skrev bare en lang liste text:

= HYPERLINK (A2, A2)

Problemet var, at du havde skrevet formlen med komma og ikke med semikolon.

Den rette formel er =hyperlink(A2;A2)
This comment was minimized by the moderator on the site
Thank you much!!!!
This comment was minimized by the moderator on the site
Спасибо большое за ваш труд
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations