Dosya simgesi

Kullanıcı Tanımlı Fonksiyon ile Ad Soyad Ayırma

Kullanıcı Tanımlı Fonksiyon ile Ad Soyad Ayırma
Bu dosya, tek hücrede yazılı ad ve soyad bilgisini VBA ile hazırlanmış iki kullanıcı tanımlı fonksiyonla ayırır. Soyadı olarak hücredeki son kelime kabul edilir; bu nedenle birden fazla isimli kayıtlarda da son boşluktan sonraki bölüm soyadı olarak alınır.

Dosyanın içeriği​

  • Sayfa1: B1:E21 aralığında ad soyad listesi ve sonuç sütunları bulunur. Soyadı sonucu E3 hücresinden başlar ve ilgili satırdaki ad soyad bilgisini B sütunundan alır.
  • Module1: SOYADI ve ADI adlı iki fonksiyonu içeren VBA modülüdür.

Kullanılan formüller​

Sayfada soyadı ayırmak için SOYADI fonksiyonu çağrılır:
Excel formülü
=SOYADI(B3)
Formül, B3 hücresindeki metnin son boşluğundan sonraki bölümü döndürür. Ad bölümü için aynı mantıkla ADI fonksiyonu kullanılır.

Makrolar​

Dosya makro içerir, açarken makroları etkinleştirmeniz gerekir. Makrolar düğmeyle çalıştırılmaz; kullanıcı tanımlı fonksiyon olduğundan hücreye formül olarak yazılır.
  • SOYADI: Hücredeki metni sondan başa doğru tarar, bulduğu ilk boşlukta durur ve o boşluğun sağındaki metni döndürür.
  • ADI: Aynı şekilde son boşluğu bulur ve boşluğa kadar olan sol bölümü döndürür. Sonuçta ad kısmının sonundaki boşluk da yer alır; gerekirse TRIM (TR: KIRP) ile temizlenebilir.
Kodda zararlı bir işlem bulunmaz; dosya silme veya dış bağlantı yoktur.

Nasıl kullanılır​

  1. Dosyayı açın ve makroları etkinleştirin.
  2. Ad soyad bilgilerini B sütununa girin.
  3. Soyadı için sonuç hücresine =SOYADI(B3) yazın, ad için =ADI(B3) yazın.
  4. Formülleri listenin son satırına kadar aşağı kopyalayın.
  5. Fonksiyonları başka bir dosyada kullanmak için Module1 içindeki kodu o dosyanın bir modülüne kopyalayın ve dosyayı .xlsm olarak kaydedin.
Hücrede boşluk bulunmayan tek kelimelik kayıtlarda fonksiyonlar hata verebilir; bu tür satırlar kontrol edilmelidir.

AhmetRasim tarafından daha fazla dosya

Detaylar
Yazar
AhmetRasim
İndirme
14
Gösterim
2,762
İlk sürüm
Güncel
SHA-256
06538f583783ecef0e81808b10b7db1575e9e3cddcd46c587ef1a6dacfbe1f06

Puanlar

0.00 Oylama 0 İnceleme
Geri
Üst