döngü ile sayıyı dağıtma

[Carpintero]

Merhabalar
E3 hücresine girilen sayıyı B sütununda ki sayılar gözetilerek C sütununa
dağıtılacak. Sayıların tam sayı olması zorunlu değil.

1 2 3 4 şeklinde 4 adet kriterimiz var.
-1 numara en çok payı almalıdır.
-aynı rakamdan birden fazla ise paylar eşit olmalıdır.
gibi bir düşünce ile hazırladım. Mantık hatası yok ise eğer
yardımcı olunabilirse çok sevinirim.
saygılarımla.

 

[muygun]

Merhaba;
Eki deneyin. (işlevlerle çözüm)
İyi çalışmalar.

Link:
http://s4.dosya.tc/server2/hbjhy1/Carpintero-toplam_sayiyi_dagit.zip.html

Not: B1 hücresine 7 yazarsanız örneğinizdeki sonucu alırsınız.

 

[Carpintero]

Çok teşekkür ederim sayın muygun
makro ile istememde ki amaç bir bütünün parçası olduğu içindi.

Eğer bu şekilde sıkıntı oluyor ise;
Sadece şu şekilde bir makro da işimi görür:
E3 hücresindeki sayıyı B sütununu kontrol et
kaç tane 1 var ise eşit şekilde paylaştır. (diğer sayılar görmezden gelinecek)
kodun içinde burada 1 rakamı geçmesi lazım koşul olarak.

Burada ki amacım ben rakamları farkıl kodlar ile buldurup manuel olarak
rakamı bölüp dağıttırabilirim.