Bir sütundaki değerleri sayma

[MRCEM]

Merhbalar
Bu soruyu size örnek yaparak soracağım

A B
1 - 1,2,10

A1 sütununda 3 tane rakam var. Bu sürundaki rakam sayılarını B1 sütununa yazmasını istiyorum. ( sorunun cevabı 3 olması gerekiyor)

 

[ALPEN]

[vb:1:e7a212dfb6]For i = 1 To Cells(65536, 1).End(xlUp).Row
Cells(i, 2) = UBound(Split(Cells(i, 1), ",")) + 1
Next i[/vb:1:e7a212dfb6]

 

[Haluk]

@MRCEM;

A1 sütunu seklinde bir tanım yoktur.

A1 hucresi veya A sutunu şeklinde tanımlamanız gerekir ki, tanımlamaya gore cevaplar degisebilir.

Yani; sizin degerlerinizin hepsi A1 hucresinde mi yoksa; A1, A2 ve A3 hucrelerinde mi ?

Buna gore yukarıda ALPEN tarafından onerilen VBA kodu sizin isinize yarayabilir veya yaramayabilir. İlave olarak; eğer bütün datalarınız A1 hucresinde ise, bunlar ne sekilde birbirlerinden ayrılmis durumda ? Yani, hangi karakterle ayrilmis ise bunu kullanarak VBA yerine yerlesik fonksiyonlarla da cozum uretilebilinir.

 

[ALPEN]

ve sağ köşedee, mavi mayosuylaa, avrupa excel şampiyonuuu, satır sütun fatihiii, Raideeer.

hehe, iş seyahat gergin geçti galiba.
tekrar hoşgeldin.

 

[Levent Menteşoğlu]

Sn Raider

Sn MRCEM'in sorusundan ben A1 hücresindeki değerin örneğin metin halinde 1,2,10 şeklinde bulunduğunu anladım. Bundan hareketle mevcut işlevler içinde soruyu cevaplayabilecek bir işlev bulamadım. Ã?rneğin metin içindeki "," virgül değerlerinin sayısını veren bir işlev olsaydı sonuç çok kolay bulunacaktı. Belkide vardır benmi denk gelmedim bilemiyorum. BUL ve MBUL işlevleri maalesef sonuç vermiyor,her ikiside ilk bulduğu "," virgülün kaçıncı sırada olduğunu söylüyor. Açıkçası mevcut işlevlerle yapılabiliceğin mümkün olduğunu ispatını bende merakla bekliyorum.

 

[Haluk]

........
hehe, iş seyahat gergin geçti galiba.
tekrar hoşgeldin.
.......

Hoşbulduk ..... walla zor bir seyehatti, nerden anladın

 

[MRCEM]

Tekrar merhabalar
Galiba soruyu tam olarak anlatamadım Bir daha ayrıntılı olarak yazacağım.

A1 hücresine aralarına virgül koyarak 3 tane rakam yazıyorum ( 1,2,10 )
Benim istediğim herhangi bir hücrede A1 hücresinin içinde kaç tane rakam olduğunu yazması. Yani 3 tane olması gerekiyor. Bu arada Türkçe bilgisayar kullanıyorum. Formül yazılırken bu da göz önüne alınırsa sevinirim.

Saygılar;
Cem

 

[Haluk]

@leventm; @MRCEM

Demek istediğim; Data >> Text to Columns (Comma işaretlenerek)

daha sonra da; klasik CountA formulünü kullanmak.

 

[Haluk]

@leventm; @MRCEM

Bu da, formül kullanılarak bir çözüm:

=LEN(A1)-LEN(SUBSTITUTE(SUBSTITUTE(A1;",";"");",";""))+1

Edit:
Formüldeki fonksiyonların Tr karşılığı için aşağıdaki linke tıklayınız.

http://www.excel.web.tr/viewtopic.php?t=768

 

[Hüseyin]

=LEN(A1)-LEN(SUBSTITUTE(SUBSTITUTE(A1;",";"");",";""))+1

Üstad tebrikler.
Seyahatin izleri siliniyor galiba.

 

[Levent Menteşoğlu]

Sn Raider

Gerçekten harika bir çözümdü. teşekkürler

Türkçesinide verelim.

=UZUNLUK(A1)-UZUNLUK(YERİNEKOY(YERİNEKOY(A1;",";"");",";""))+1

 

[Haluk]

@Hüseyin;@ leventm

Rica ederim.

Bu arada; aşağıdaki de biraz daha kısaltılmış şekli:

=LEN(A1)-LEN(SUBSTITUTE(A1;",";""))+1

Office TR için:

=uzunluk(A1)-uzunluk(yerinekoy(A1;",";""))+1

 

[ALPEN]

süper çözüm.

=LEN(A1)-LEN(SUBSTITUTE(A1;",";""))+1

de çalışıyor.

edit : süper çözüm derken Raider'in çözümünden bahsettim. :mrgreen:

 

[Haluk]

hehehee.....

Yaw o kadar abartılacak bir durum yok ortada..... :mrgreen:

Aşağıdaki adreste de zaten bu konu işlenmiş durumda;

http://www.cpearson.com/excel/excelF.htm

 

[MRCEM]

Cok tesekur ederım
Sitenizi sık sık ziyaret edeceğim

Cem