Přejít k hlavnímu obsahu

Jak extrahovat název domény z adresy URL v aplikaci Excel?

Autor: Xiaoyang Naposledy změněno: 2024-08-01

Pokud ve svém sešitu vždy pracujete s mnoha adresami URL, možná budete chtít z každé webové stránky extrahovat pouze název domény. Jak můžete v aplikaci Excel rychle získat názvy domén z adres URL?

Extrahujte název domény z adresy URL pomocí vzorce

Extrahujte název domény z adresy URL pomocí funkce definované uživatelem


Extrahujte název domény z adresy URL pomocí vzorce

Následující dlouhý vzorec vám pomůže vrátit název domény z webové stránky podle potřeby. Postupujte prosím následovně:

1. V prázdné buňce vedle buňky webové stránky zadejte následující vzorec, v tomto příkladu zadám vzorec do buňky 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)).

snímek obrazovky s použitím vzorce

Pozor: ve výše uvedeném vzorci, A2 označuje buňku obsahující webovou stránku, ze které chcete získat název domény, můžete ji podle potřeby změnit.

2. Pak stiskněte tlačítko vstoupit klíč a vyberte buňku B2, přetáhněte úchyt výplně dolů do rozsahu, na který chcete použít tento vzorec, a z každé adresy URL byly extrahovány všechny názvy domén. Viz screenshot:

snímek obrazovky s výsledky


Extrahujte název domény z adresy URL pomocí funkce definované uživatelem

Pokud vás kód VBA zajímá, můžete si vytvořit Uživatelem definovaná funkce extrahovat název domény z URL.

1. Podržte ALT + F11 klávesy pro otevření Okno Microsoft Visual Basic pro aplikace.

2, klikněte Vložit > Modula vložte následující kód do Okno modulu.

Kód VBA: extrahujte název domény z adresy 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. Poté uložte a zavřete kód, vraťte se do listu a zadejte tento vzorec = Extractdomain (A2) do prázdné buňky kromě webové stránky, viz screenshot:

snímek obrazovky s použitím uživatelem definované funkce

4. A pak stiskněte vstoupit vyberte buňku B2 a přetáhněte úchyt výplně dolů do buněk, které chcete tento vzorec obsahovat, a z každé buňky webové stránky budou extrahovány všechny názvy domén.


Související články:

Jak extrahovat domény z více e-mailových adres v aplikaci Excel?

Jak rychle extrahovat e-mailovou adresu z textového řetězce?


Nejlepší nástroje pro produktivitu v kanceláři

🤖 Kutools AI asistent: Revoluční analýza dat založená na: Inteligentní provedení   |  Generovat kód  |  Vytvořte vlastní vzorce  |  Analyzujte data a generujte grafy  |  Vyvolejte funkce Kutools...
Populární funkce: Najít, zvýraznit nebo identifikovat duplikáty   |  Odstranit prázdné řádky   |  Kombinujte sloupce nebo buňky bez ztráty dat   |   Kolo bez vzorce ...
Super vyhledávání: Více kritérií VLookup    VLookup s více hodnotami  |   VLookup na více listech   |   Fuzzy vyhledávání ....
Pokročilý rozevírací seznam: Rychle vytvořte rozevírací seznam   |  Závislý rozbalovací seznam   |  Vícenásobný výběr rozevíracího seznamu ....
Správce sloupců: Přidejte konkrétní počet sloupců  |  Přesunout sloupce  |  Přepnout stav viditelnosti skrytých sloupců  |  Porovnejte rozsahy a sloupce ...
Doporučené funkce: Zaměření mřížky   |  Návrhové zobrazení   |   Velký Formula Bar    Správce sešitů a listů   |  Knihovna zdrojů (Automatický text)   |  Výběr data   |  Zkombinujte pracovní listy   |  Šifrovat/dešifrovat buňky    Odesílat e-maily podle seznamu   |  Super filtr   |   Speciální filtr (filtr tučné/kurzíva/přeškrtnuté...) ...
Top 15 sad nástrojů12 Text Tools (doplnit text, Odebrat znaky, ...)   |   50+ Graf Typ nemovitosti (Ganttův diagram, ...)   |   40+ Praktické Vzorce (Vypočítejte věk na základě narozenin, ...)   |   19 Vložení Tools (Vložte QR kód, Vložit obrázek z cesty, ...)   |   12 Konverze Tools (Čísla na slova, Přepočet měny, ...)   |   7 Sloučit a rozdělit Tools (Pokročilé kombinování řádků, Rozdělit buňky, ...)   |   ... a více

Rozšiřte své dovednosti Excel pomocí Kutools pro Excel a zažijte efektivitu jako nikdy předtím. Kutools for Excel nabízí více než 300 pokročilých funkcí pro zvýšení produktivity a úsporu času.  Kliknutím sem získáte funkci, kterou nejvíce potřebujete...


Office Tab přináší do Office rozhraní s kartami a usnadňuje vám práci

  • Povolte úpravy a čtení na kartách ve Wordu, Excelu, PowerPointu, Publisher, Access, Visio a Project.
  • Otevřete a vytvořte více dokumentů na nových kartách ve stejném okně, nikoli v nových oknech.
  • Zvyšuje vaši produktivitu o 50%a snižuje stovky kliknutí myší každý den!