Arama butonu
Bu konudaki kullanıcılar: 1 misafir, 1 mobil kullanıcı
4
Cevap
4636
Tıklama
0
Öne Çıkarma
excelde rastgele sayı dağıtma
S
12 yıl
Teğmen
Konu Sahibi

yapmak istediğim ama beceremediğim a1 hücresine verdiğim değeri formül b1 c1 d1 hücrelerine rastgele dağıtacak yani bu üç hücredeki sayıların toplamı a1 e eşit olacak

DH forumlarında vakit geçirmekten keyif alıyor gibisin ancak giriş yapmadığını görüyoruz.

Üye olduğunda özel mesaj gönderebilir, beğendiğin konuları favorilerine ekleyip takibe alabilir ve daha önce gezdiğin konulara hızlıca erişebilirsin.

Üye Ol Şimdi Değil



S
9 yıl
Er

Sub Macro1()
'
' Macro1 Macro
i = Int(Rnd() * 10)

BuOlmadi:
j = Int(Rnd() * 10)
y = Int(Rnd() * 10)

If ((j + y) <> i) Then GoTo BuOlmadi

Range("a1").Value = i
Range("e1").Value = j
Range("e2").Value = y


End Sub


Bu mesaja 1 cevap geldi.
S
9 yıl
Er

10 değeri senin a1 e girmek istediğin değer onu kafana göre değiştirirsin kaç hücreye dağıtacaksanda o kadar j,i gibi değişken ekle ve if komutuna + olarak ekle


Bu mesaja 1 cevap geldi.

Bu mesajda bahsedilenler: @sadaasdasda
A
9 yıl
Binbaşı

Sub RastgeleSayiDagit() 

s = Val(Range("a1").Value)

s1 = Int(Rnd() * (s - 2))
s2 = Int(Rnd() * (s - s1))
s3 = s - s2 - s1

Range("b1").Value = s1
Range("c1").Value = s2
Range("d1").Value = s3

End Sub





< Bu mesaj bu kişi tarafından değiştirildi akcan -- 28 Ekim 2016; 11:00:28 >

I
5 yıl
Teğmen

Şu online tool konuyla ilgilenenlere yardımcı olabilir -> https://functioncube.com/Functions/Divide-Number



DH Mobil uygulaması ile devam edin. Mobil tarayıcınız ile mümkün olanların yanı sıra, birçok yeni ve faydalı özelliğe erişin. Gizle ve güncelleme çıkana kadar tekrar gösterme.