Excel'de URL'den etki alanı adı nasıl çıkarılır?

Çalışma kitabınızda sürekli bir sürü URL ile uğraşıyorsanız, bazen her web sayfasından sadece etki alanı adını çıkarmak isteyebilirsiniz. Excel'de, URL'lerden etki alanı adlarını hızlıca nasıl alabilirsiniz?

Formülle URL'den etki alanı adı çıkarma

Kullanıcı Tanımlı Fonksiyon ile URL'den etki alanı adı çıkarma

Formülle URL'den etki alanı adı çıkarma

Aşağıdaki uzun formül, ihtiyacınız olan web sayfasından etki alanı adını döndürmenize yardımcı olabilir. Lütfen şu adımları izleyin:

1. Web sayfası hücresinin yanındaki boş bir hücreye aşağıdaki formülü girin; bu örnekte formülü B2 hücresine yazacağım: =EĞER(SAYIYSA(BUL("www.",A2)),ORTA(A2,BUL("www.",A2)+4,EĞER(SAYIYSA(BUL("/",A2,9)),BUL("/",A2,9),UZUNLUK(A2)+1)-BUL("www.",A2)-4),ORTA(A2,BUL("//",A2)+2,EĞER(SAYIYSA(BUL("/",A2,9)),BUL("/",A2,9),UZUNLUK(A2)+1)-BUL("//",A2)-2)).

Not: Yukarıdaki formülde, A2, etki alanı adını almak istediğiniz web sayfasını içeren hücreyi belirtir, bunu ihtiyaçlarınıza göre değiştirebilirsiniz.

2. Sonra Enter tuşuna basın ve B2 hücresini seçin, formülü uygulamak istediğiniz aralığa kadar dolgu tutamacını sürükleyin ve her URL'den tüm etki alanı adları çıkarılacaktır. Ekran görüntüsüne bakın:

Kullanıcı Tanımlı Fonksiyon ile URL'den etki alanı adı çıkarma

Eğer VBA koduyla ilgileniyorsanız, URL'lerden etki alanı adını çıkarmak için bir Kullanıcı Tanımlı Fonksiyon oluşturabilirsiniz.

1. Microsoft Visual Basic for Applications penceresini açmak için ALT + F11 tuşlarına basın.

2. Ekle Insert > Module, ve aşağıdaki kodu Module Window. yapıştırın.

VBA kodu: URL'den etki alanı adı çıkarma

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. Ardından kodu kaydedip kapatın, çalışma sayfasına geri dönün ve bu formülü =Extractdomain(A2) web sayfasının yanındaki boş bir hücreye girin, ekran görüntüsüne bakın:

4. Ve sonra Enter tuşuna basın, B2 hücresini seçin ve bu formülü içeren hücrelere kadar dolgu tutamacını sürükleyin, her web sayfası hücresinden tüm etki alanı adları çıkarılacaktır.

İlgili makaleler:

Excel'de birden fazla e-posta adresinden etki alanlarını nasıl çıkarırız?

Metin dizisinden e-posta adresini hızlıca nasıl çıkarabiliriz?