Jak extrahovat název domény z adresy URL v aplikaci Excel?
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)).
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:
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:
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
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!