Przejdź do głównej zawartości

Jak wyodrębnić nazwę domeny z adresu URL w programie Excel?

Jeśli zawsze masz do czynienia z dużą liczbą adresów URL w skoroszycie, czasami możesz chcieć wyodrębnić tylko nazwę domeny z każdej strony internetowej. W programie Excel, jak szybko uzyskać nazwy domen z adresów URL?

Wyodrębnij nazwę domeny z adresu URL za pomocą formuły

Wyodrębnij nazwę domeny z adresu URL za pomocą funkcji zdefiniowanej przez użytkownika


strzałka niebieski prawy bąbelek Wyodrębnij nazwę domeny z adresu URL za pomocą formuły

Poniższa długa formuła może pomóc w zwróceniu nazwy domeny ze strony internetowej w razie potrzeby. Wykonaj następujące czynności:

1. W pustej komórce, która obok komórki strony internetowej wprowadź następującą formułę, w tym przykładzie wpiszę formułę w komórce B2: =IF(ISNUMBER(FIND("www.",A2)),MID(A2,FIND("www.",A2)+4,IF(ISNUMBER(FIND("/",A2,9)),FIND("/",A2,9),LEN(A2)+1)-FIND("www.",A2)-4),MID(A2,FIND("//",A2)+2,IF(ISNUMBER(FIND("/",A2,9)),FIND("/",A2,9),LEN(A2)+1)-FIND("//",A2)-2)).

doc-extract-url-domeny-1

Note: w powyższym wzorze, A2 wskazuje komórkę zawierającą stronę internetową, z której chcesz pobrać nazwę domeny, możesz ją zmienić w razie potrzeby.

2. Następnie naciśnij Wchodzę i wybierz komórkę B2, przeciągnij uchwyt wypełniania w dół do zakresu, w którym chcesz zastosować tę formułę, a wszystkie nazwy domen zostały wyodrębnione z każdego adresu URL. Zobacz zrzut ekranu:

doc-extract-url-domeny-1


strzałka niebieski prawy bąbelek Wyodrębnij nazwę domeny z adresu URL za pomocą funkcji zdefiniowanej przez użytkownika

Jeśli interesuje Cię kod VBA, możesz utworzyć plik Funkcja zdefiniowana przez użytkownika wyodrębnić nazwę domeny z adresów URL.

1. Przytrzymaj ALT + F11 klawisze, aby otworzyć Okno Microsoft Visual Basic for Applications.

2. Kliknij wstawka > Modułi wklej następujący kod w Okno modułu.

Kod VBA: wyodrębnij nazwę domeny z adresu URL

Function ExtractDomain(ByVal URL As String) As String
'Update 20140904
    If InStr(URL, "//") Then
        URL = Mid(URL, InStr(URL, "//") + 2)
    End If
    If Left(URL, 4) Like "[Ww][Ww][Ww0-9]." Then
        URL = Mid(URL, 5)
    End If
    ExtractDomain = Split(URL, "/")(0)
End Function

3. Następnie zapisz i zamknij kod, wróć do arkusza i wprowadź tę formułę = Wyodrębnij domenę (A2) do pustej komórki poza stroną internetową, zobacz zrzut ekranu:

doc-extract-url-domeny-1

4. A następnie naciśnij Wchodzę , wybierz komórkę B2 i przeciągnij uchwyt wypełniania w dół do komórek, które chcesz zawrzeć w tej formule, a wszystkie nazwy domen zostaną wyodrębnione z każdej komórki strony internetowej.


Podobne artykuły:

Jak wyodrębnić domeny z wielu adresów e-mail w programie Excel?

Jak szybko wyodrębnić adres e-mail z ciągu tekstowego?

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 (2)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
This formula worked for all my URLs except for ones with another URL in the query string. Would love a fix for that, but otherwise, it's great!
This comment was minimized by the moderator on the site
Thank you very much for making this formula available. I was able to use it. Thank you.
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations