Makrolar ile Metni Sütunlara Bölme

Dosya, bir hücredeki cümlenin kelimelerini ayrı sütunlara dağıtmak için hazırlanmış MetniAyir adlı kullanıcı tanımlı fonksiyonu (KTF) içerir. Fonksiyon, istenen sıradaki kelimeyi baştan ya da sondan sayarak getirir.
Önemli: Dosya makro içerir (.xlsm); açarken makroları etkinleştirmeniz gerekir. Makrolar etkinleştirilmezse fonksiyon çalışmaz.

Dosyanın içeriği​

• Sayfa1: B2:H4 aralığında örnek tablo bulunur. B3 hücresinde bölünecek cümle yer alır; D2 başlık hücresindeki sayı kelime sırasını belirler, D3 hücresindeki formül de sonucu verir. Formüller sağa doğru kopyalanarak her sütunda bir kelime elde edilir.
• Module1: MetniAyir fonksiyonunun VBA kodu.

Kullanılan formüller​

D3 hücresinde cümlenin kelimesini çeken formül kullanılır. Kelime sırası, D2 başlığının LEFT ile alınan ilk karakterinden okunur; "B" parametresi sayımın baştan yapılacağını belirtir:
Formül Excel'in Türkçe sürümünde de aynı yazılır; fonksiyon adı değişmez, ancak ayırıcı olarak noktalı virgül kullanılır.

Makrolar​

MetniAyir fonksiyonu dört bağımsız değişken alır:

• Metin: Bölünecek cümle.
• Kacincikelime: Alınacak kelimenin sırası.
• Bastan_yada_Sondan: "B" yazılırsa baştan, "S" yazılırsa sondan sayılır.
• ayirici: İsteğe bağlıdır; boş bırakılırsa ayırıcı olarak boşluk kullanılır.

Fonksiyon metindeki ayırıcıları sayar, istenen kelimenin başlangıç ve bitiş konumlarını bulur ve aradaki metni döndürür. Metin 3 karakterden kısaysa, hiç ayırıcı yoksa veya sıra bulunamazsa sonuç olarak * döner. Kod dosya silme ya da dış bağlantı gibi işlem içermez. Makro, hücre formülünden çağrıldığı için ayrıca çalıştırılması gerekmez.

Nasıl kullanılır​

1. Dosyayı açın ve makroları etkinleştirin.
2. B sütununa bölmek istediğiniz cümleyi yazın.
3. Başlık satırındaki hücrelere kelime sırasını belirten sayıyı girin.
4. Formülü ilgili sütunlara ve satırlara kopyalayın; her sütunda cümlenin ilgili kelimesi görünür.
5. Sondan saymak için formüldeki "B" harfini "S" olarak değiştirin.
6. Kendi dosyanızda kullanmak için Module1 içindeki kodu çalışma kitabınıza kopyalayın.