Hücredeki 1 den çok ismi sütunlara tek tek dağıtmak

[KMLZDMR]

Sayın site arkadaşlar;
C2 hücresindeki 5 adet isim ; ile ayrıştırılmış isimleri
B SÜTUNUNDA B5,B6,B7,B8,B9,Bx .OLARAK AŞAĞIYA DOĞRU İşareti dikkate alınarak SADECE İSİMLERİ GETİREBİLEN FONKSİYON GEREKLİ.
dosya ektedir.

Selamlar.

 

[KMLZDMR]

Yardım edebilecek var mı?

 

[sakman26]

selam,
eki inceleyiniz..
kolay gelsin..

 

[KMLZDMR]

TEŞEKKÜR EDERİM.
Sayın sakman26 formüldeki "@" işareti ne işe yarıyor?

Arkadaşlardan bu bu işlemi daha kısa formülle yapabilen olursa beklerim.

 

[ÖmerBey]

Function PARAMPARÇA(hcr As Range, ayrac, sıra)
PARAMPARÇA = Split(hcr.Value, ayrac)(sıra - 1)
End Function

Yukarıdaki kodu boş bir modüle kopyaladıktan sonra B5 hücresine aşağıdaki formülü yazıp aşağı doğru çekerek çoğaltınız.

=PARAMPARÇA($C$2;"; ";SATIRSAY($5:5))

 

[KMLZDMR]

SAKMAN 26
FORMLÜNÜZDEKİ "@" ne işe yaradığını yazmadınız.

 

[sakman26]

selam,
"@" karakterinin bir özelliği yok. Başka bir karakter de kullanılabilir. Önemli olan , dizilimdeki kural olan "; " un yerine geçecek ve isimlerin bu karakterle başlamayacağı benzersiz bir karakter olması... O amaçla kullanılmıştır.
kolay gelsin..

Düzeltme : "isimlerin bu karakterle başlamayacağı" ibaresi yerine isimlerde bu karakterin bulunmayacağı ibaresi kullanılması gerekliydi...

 

[KMLZDMR]

Teşekkür ederim