...isteniyorsa açıklama yaparak Örnek dokuman ekleyin...
Yorumladığım şu...
10 kolon olacak
Bu 10 kolondan bazen 6 ya da 7 ya da ... 10 kolon rastgele not atanacak.
Atanacak olan notlar, belirlenecek olan maxi puan değerlerine göre olup 5 ve 5 in katları olacak şekilde atanacak.
Buna göre...
Öncelikle, A11 hücresine bir değer girin.
Ardından, A10'dan başlayarak sola doğru 10 hücreye rastgele sayılar eklemek için şu formülü kullanabilirsiniz:
=IF(COLUMN()-COLUMN($A$10)<=10, RANDBETWEEN(0,10), "")
Bu formül, A10 hücresinden başlayarak sola doğru 10 hücreye rastgele 0 ile 10...
eksik anlattım galiba. bu dediklerinize ek olarak puanların 0 veya 5'in katları şeklinde olmasını istiyorum.9 nolu mesajdaki dosya ile 13teki dosyanın birleşimi gibi. istediğimde 100 puanı 6,7,8,9 veya 10 sütuna paylaştırdığım değerlere göre 0 veya 5in katları şeklinde dağıtacak.
13. no lu mesajda eklediğim dosyada
6 kolon için rastgele değer atanmasını istiyorsunuz...
** 10 kolon var. İlk 6 kolonu bırakıp, 7-8-9-10.ncu kolonları seçip silin. Yani, I-J-K-L kolonlarını komple seçin ve silin.
** Bu duruma uygun olarak da,
C3, D3, E3 ve F3 hücrelerine 20 yazın. G3 ve H3...
...hisseyi hata alınanlar listesine ekliyor ve ilk sırayı bitirdiğinde hatalı olan hisseleri tekrar taramaya başlıyor. Her bir tarama için rastgele user agent atandığından maksimum 3-4 üncü denemesinde tüm hisseleri eksiksiz aktarıyor. hem lira hem dolar olarak fiyatlar excel doyasına...
...hisseyi hata alınanlar listesine ekliyor ve ilk sırayı bitirdiğinde hatalı olan hisseleri tekrar taramaya başlıyor. Her bir tarama için rastgele user agent atandığından maksimum 3-4 üncü denemesinde tüm hisseleri eksiksiz aktarıyor. hem lira hem dolar olarak fiyatlar excel doyasına...
...sonuna sürekli aynı mesajları kullanmaları (HAVA DURUMU RAPORU, SAYIN GENERAL, SIEG HEIL, GIZLI, HIZMETE OZEL, vb), metnin başına ve sonuna rastgele anlamsız kelimeler eklemeye üşenmeleri, tembel sekreterlerin rotor (çark) başlangıç konumlarını hiç değiştirmemeleri veya 000 pozisyonunda...
Mesala A1 sutunundaki saat 00:00 ile 01:00 arasında ise b1 sutununa 1 ile 10 arası bir sayı 01:00 ile 02:00 arasında ise 11 ile 20 arası olcak şekilde böyle 24 saat aralıgında kendi belirledigim aralıkta rasgele sayılar verebilcegim bir formül varmıdır
...fikri verdi. Üzerinde çalışmaya devam ediyorum. Teşekkür ederim ilginiz için.
Henüz tamamlanmamış olsa da dosya ektedir. açılışta ID kısmına rastgele bir sayı ve Name kısmına da bir isim yazmanız yeterli. Boş olursa hata veriyor. Sonra bir senaryoya tıklayıp Start butonuna bastığınızda...
...EĞER(VE(C:C<>"";B:B=Bugün());"Acil iş var";"Acil iş yok") gibi bir formül yazmayı denedim ancak işe yaramadı.
Bu arada yukarıdaki formülü rastgele şu an yazdım yani hata olabilir.
Ne şekilde yapabiliriz ?
Mesela yukarıdaki tabloda sadece 1. satır için acil iş olduğunu bildirmeli şu an...
Merhabalar Sayın Uzmanlarım,
Denetim faaliyetlerinde kullanılmak üzere muavin üzerinden örnekleme seçimleri için rasgele yöntemi uygulamak istiyorum. Ancak bunu yaparken yüzlerce satır içinde küçük tutarlıları seçmesini istemiyorum. Örneğin en düşüğü 0 en yükseği 100 olan bir örneklem kümesinde...
Merhaba,
G7:J11 arasındaki formülü G7=EĞER(G$4<>"";RASTGELEARADA(MAK($C7;G6+1);$D7);"") bu şekilde güncelleyip dener misiniz? Bu sayede Rastgele arada formülü bir önceki yüzdelik dilimdeki A değerinin bir fazlası ile A'nın o satırdaki min değeri arasından en büyük olanını taban olarak...
...dağıtım yapmak istiyordum:
Şöyle: 5%' i: 33000*5%= 1650, bu değeri ürünlere dağıtmak için ;
B, C, D, E ürünlerine belli aralık içinde rastgele değerler atayarak, sonra Toplamı tutturmak adına 1650-( B+ C+ D+ E) = A formülü ile bir çözüm ürettim, buraya kadar bir sıkıntı yoktu,
Yalnız şöyle...
Merhaba, arkadaşlar adam böyle bir şey yapmış insanların ismini yazıyor entere basıyor. rast gele telefon resimi çıkıyor ve telefon modeli yazıyor. şu projeyi excelde nasıl yapa bilirim?
Merhaba ilgili kodun nasıl çalıştığını ve kullanılacağını, konu sayfasında resimli olarak açıklamıştım.
https://www.excel.web.tr/threads/rastgele-arada-formuelue-hk.212221/post-1189420
...= False
Dim s1 As Worksheet, i As Byte, x As Byte, dizi()
Set s1 = ActiveSheet: x = Target.Value
ReDim dizi(x)
For i = 1 To x
rastgele = WorksheetFunction.RandBetween(-2, 2)
dizi(i) = rastgele
Next i
s1.Range("G" & Target.Row) = Join(dizi, ", ")
End If
Application.ScreenUpdating =...
Sizlere daha iyi bir deneyim sunabilmek icin sitemizde çerez konumlandırmaktayız, web sitemizi kullanmaya devam ettiğinizde çerezler ile toplanan kişisel verileriniz Veri Politikamız / Bilgilendirmelerimizde belirtilen amaçlar ve yöntemlerle mevzuatına uygun olarak kullanılacaktır.