KTF ile Email Kontrol

Bu dosya, bir hücreye yazılan metnin e-posta adresi biçiminde olup olmadığını kontrol eden kullanıcı tanımlı bir fonksiyon (KTF) içerir. Fonksiyon, sonuç olarak True veya False değeri döndürür ve hücre formülü olarak kullanılabilir.

Dosyanın içeriği​

• exceldestek.com | exceldepo.com sayfası: A1:A4 aralığında dört örnek metin bulunur: A@b, A@web.com, A@b.cdefgh ve exceldestek.com. Fonksiyon bu örnekler üzerinde denenebilir.
• Module1: VBA modülünde Mail adlı fonksiyon yer alır.

Sayfada hazır formül bulunmaz; kontrol sonuçları için fonksiyon kullanıcı tarafından hücreye yazılır.

Makrolar​

Dosya makro içerir, açarken makroları etkinleştirmeniz gerekir. Mail fonksiyonu, kendisine verilen metni sırasıyla şu kurallara göre denetler:

1. Metinde @ işareti bulunmalıdır; yoksa sonuç False olur.
2. @ işaretinden sonraki kısımda ikinci bir @ bulunmamalıdır.
3. @ işaretinden sonra nokta bulunmalı ve nokta, @ işaretinden hemen sonra gelmemelidir; yani alan adı en az bir karakter içermelidir.
4. Son noktadan değil, ilk noktadan sonra gelen bölümün uzunluğu 2 ile 5 karakter arasında olmalıdır.

Bu kuralların tümü sağlanırsa sonuç True döner. Kontrol yalnızca yapıya bakar; adresin gerçekten var olup olmadığını doğrulamaz. Kod dosya silme veya dış bağlantı gibi işlemler içermez.

Nasıl kullanılır​

1. Dosyayı açın ve makroları etkinleştirin.
2. Boş bir hücreye fonksiyonu, kontrol edilecek metnin bulunduğu hücreye başvurarak yazın. Örneğin A2 hücresindeki metin için:
   
   Excel formülü

   =Mail(A2)

3. Sonuç True ise metin e-posta biçimine uygundur, False ise uygun değildir.
4. Formülü aşağı kopyalayarak diğer satırlara uygulayın.
5. Fonksiyonu kendi dosyanızda kullanmak için Alt+F11 ile VBA düzenleyicisini açıp Module1 içeriğini kendi dosyanızdaki bir modüle taşıyın ve dosyayı .xlsm olarak kaydedin.