Excel'de web adresleri nasıl çıkarılır?
Meslektaşınızdan, bir sütunda köprülerin listesinin bulunduğu bir Excel çalışma kitabı aldığınızı varsayalım. Şimdi bu listeden tüm köprü URL’lerini çıkarmak istiyorsunuz.
Manuel yöntem gerçek bir baş ağrısıdır; her URL’yi tek tek kopyalayıp yapıştırmanız gerekir. Yani en iyi yol VBA’da bir UDF oluşturmaktır . Ve bugün sizinle bu UDF için basit bir kod paylaşmak istiyorum.
Köprü URL’lerini ayıklamak için VBA kodu
Function GiveMeURL(rng As Range) As String On Error Resume Next GiveMeURL = rng.Hyperlinks(1).Address End Function
Bu kod nasıl kullanılır?
Bu UDF’yi kullanmak için şu adımları izlemelisiniz:
- Geliştirici sekmesinden Visual Basic Düzenleyicisi’ni açın veya ALT+F11 klavye kısayolunu kullanın.
- Yeni bir modül ekleyip yukarıdaki kodu içine yapıştırın ve kapatın.
- Şimdi e-tablonuza =GiveMeURL(A1) fonksiyonunu girin ve Enter tuşuna basın.