Bu dosya, banka açıklaması gibi karışık yazılmış hücre metinlerinin içinden büyük harfle yazılmış bölümü ayıklamak için hazırlanmış bir şablondur. Ayıklama işlemi, VBA ile tanımlanmış asd adlı özel fonksiyon ve RegExp (düzenli ifade) kullanılarak yapılır.
Dosyanın içeriği
- Sayfa1: B sütununda "Metin" başlığı altında örnek veriler yer alır. Örnekler "Banka: 0010 SN: 222222 HAKAN İTİL Açk: h", "Şubeden Para Yatırma ALİ ŞEN 21.05.2021" ve "TAHSİN ER 22021 Kayaca mh TAHSİN ER hav" gibi küçük ve büyük harfli ifadelerin karıştığı satırlardır.
- Module1: asd fonksiyonunu barındıran VBA modülüdür.
Makrolar
Dosya makro içerir, açarken makroları etkinleştirmeniz gerekir. Kodda dosya silme ya da dışarıya bağlantı gibi işlemler yoktur.- asd: Parametre olarak bir hücre alır. VBScript.RegExp nesnesi ile büyük/küçük harf duyarlı arama yapar. Desen; Türkçe büyük harfleri (İ, Ç, Ü, Ğ, Ş) ve boşlukları kapsayan, en az 4 karakter uzunluğunda büyük harf dizilerini bulur. Bulunan eşleşmelerin ilkini baştaki ve sondaki boşluklardan arındırarak sonuç olarak döndürür. Eşleşme yoksa hücre boş görünür.
Nasıl kullanılır
- Dosyayı açın ve makroları etkinleştirin.
- Ayıklanacak metinleri Sayfa1 sayfasındaki B sütununa girin veya yapıştırın.
- Sonucun görüneceği hücreye fonksiyonu, kaynak hücreyi göstererek yazın. Örneğin B3 hücresi için:
=asd(B3) - Formülü diğer satırlara aşağı doğru kopyalayın.
- Dosyayı makro içerdiği için .xlsm biçiminde kaydedin. Fonksiyonu başka bir dosyada kullanmak için Module1 modülünü o dosyaya aktarın.