1-10 arasında rastgele sayı üretme

Katılım
3 Ekim 2007
Mesajlar
4
Excel Vers. ve Dili
excel 2003 türkçe
çalışma sayfasındaki bir komut düğmesine tıkladığımda 5 ayrı hücrede 1-10 arasında rastgele sayılar üretilmesini sağlamak için nasıl bir yol izlemem gerektiği konusunda yardımcı olabilir misiniz?

s_sayı_üret() fonksiyonunu yuvarla içinde kullandım ama sayı aralığı belirtemediğim için tamsayı olarak ya 0 ya da 1 değeri veriyor.

şimdiden teşekkür ederim.
 

AS3434

Özel Üye
Katılım
13 Ocak 2005
Mesajlar
1,820
Excel Vers. ve Dili
M.Office/Excel 2007 Türkçe
Sayın yaseminn

Dosyaı inceleyin.
 

Ali

Uzman
Katılım
21 Temmuz 2005
Mesajlar
7,900
Excel Vers. ve Dili
İş:Excel 2016-Türkçe
Mantık şu eğer 2 ila 20 arasında sayı üretecekseniz

=TAMSAYI((S_SAYI_ÜRET()*Büyük sayı-Küçük sayı)+Küçük sayı)

şeklinde kullanmalısınız.

Siz 1 ila 10 arası üreteceğiniz için

=TAMSAYI((S_SAYI_ÜRET()*10-1)+1)

yani

=TAMSAYI((S_SAYI_ÜRET()*9)+1) olmalıdır.
 

Necdet

Moderatör
Yönetici
Katılım
4 Haziran 2005
Mesajlar
15,374
Excel Vers. ve Dili
Ofis 365 Türkçe
Merhaba,

Alternatif olarak fonksiyonla :

Kod:
=RANDBETWEEN(1;10)
=RASGELEARADA(1;10)

Bu fonksiyonun kullanılabilmesi için Analysis ToolPak'ın yüklü olması gerekir.
 
Katılım
3 Ekim 2007
Mesajlar
4
Excel Vers. ve Dili
excel 2003 türkçe
çok teşekkürler..

sayın as3434, sayın ali bey ve sayın necdet bey. cevaplarınız için ayrı ayrı teşekkürler.

ekteki gibi bir dosya oluşturdum. amacım 5 ayrı konuda kura ile soru numarası belirlemek, şimdilik F9 ile numaralar değişiyor ve bu haliyle de kullanabilirim ancak bu işlemi bir denetim düğmesine tıklayarak yapabilir miyim? eğer vaktinizi varsa cevaplarsanız sevinirim.

teşekkürler.
 

AS3434

Özel Üye
Katılım
13 Ocak 2005
Mesajlar
1,820
Excel Vers. ve Dili
M.Office/Excel 2007 Türkçe
Aşağıdaki kodları bir butona bağlayın.

Kod:
Sub Makro1()
    [B3] = "=INT((RAND()*9)+1)"
    [c3] = "=INT((RAND()*9)+1)"
    [D3] = "=INT((RAND()*9)+1)"
    [e3] = "=INT((RAND()*9)+1)"
    [F3] = "=INT((RAND()*9)+1)"
End Sub
 
Katılım
3 Ekim 2007
Mesajlar
4
Excel Vers. ve Dili
excel 2003 türkçe
çok teşekkür ederim. çok güzel olur..
ben şimdi biraz kurcalayarak balık tutmayı öğreneyim :))
 
Katılım
2 Ekim 2007
Mesajlar
1
Excel Vers. ve Dili
2003 turkce
MERHABALAR
benimde bir sorum olacak excel kullanmayi hiç bilmiyorum söylediklerinizi denedim. ancak her farklı sey yazısımda sayilar değişiyor nasil sabitleyebilirim ben sayi araliği önemli olmamak kaydıyla 30 sayı üretmek istiyorum simdiden tesekkür ederim
 
Katılım
1 Ağustos 2005
Mesajlar
22
Sub Makro1()
[B3] = "=INT((RAND()*9)+1)"
[c3] = "=INT((RAND()*9)+1)"
[D3] = "=INT((RAND()*9)+1)"
[e3] = "=INT((RAND()*9)+1)"
[F3] = "=INT((RAND()*9)+1)"
End Sub

peki hocam bu formülle aynı çıkan sonuçları nasıl engellicez?
 
Katılım
21 Haziran 2007
Mesajlar
213
Excel Vers. ve Dili
Ev de Office 2013 Türkçe
İş'te Office 2007 -2010 English
Mantık şu eğer 2 ila 20 arasında sayı üretecekseniz

=TAMSAYI((S_SAYI_ÜRET()*Büyük sayı-Küçük sayı)+Küçük sayı)

şeklinde kullanmalısınız.

Siz 1 ila 10 arası üreteceğiniz için

=TAMSAYI((S_SAYI_ÜRET()*10-1)+1)

yani

=TAMSAYI((S_SAYI_ÜRET()*9)+1) olmalıdır.

üstad 0 'ı hariç nasıl tutarız? yani 1 ile 10 arası versin 0 vermesin
 

aerten

Altın Üye
Katılım
23 Ağustos 2011
Mesajlar
230
Excel Vers. ve Dili
Excel 2019 TR
Excel 365 TR
Altın Üyelik Bitiş Tarihi
15-02-2027
S_sayı_üret - rastgelearada

Mutlaka S_SAYI_ÜRET işlevi ile yapmak istiyorsanız;
Kod:
=YUKARIYUVARLA((S_SAYI_ÜRET()*10-1)+1;0)
formülü ile, daha kolayı ise;
Kod:
=RASTGELEARADA(1;10)
ile yapılabilir.
 
Üst