Naključne vrednosi v EXCEL celicah

[LOGITECH]

Lepo pozdravljeni,
Smem prositi, če mi lahko pomagate sledeče;
Recimo, da so vhodni podatki;
-Število transportov v enem tednu in
-Maksimalno število transportov v nekem dnevu

Rad bi, da bi mi EXCEL v celice kjer so navedeni dnevi v tednu (pon, tor, sre,...do ned) naključno vpisal ševilko 1 v kolikor je v tistem dnevu bil opravljen 1 transport oz. številko 2 v kolikor je bilo tistega dne naključno opravljenih 2 transporta itd.

Excel naj naključno nameče v celice (od pon ..do ned)številke in sicer tako, da število transportov v enem tednu ne presega max. št. transportov v tednu
in da v določenem naključnem dnevu število transportov ne presega max. št. transportov na dan

Seveda pa morajo biti številke v celicah potem dokončne in se ne spreminjajo več.

Vnaprej hvala.

[cedra]

Mislim, da vam bo pomagala pri vašem problemu funkcija:
RANDBETWEEN

Koda: Izberi vse

=RANDBETWEEN(0;1)

ali npr.

Koda: Izberi vse

=RANDBETWEEN(2;9)

itd...

Vendar pa mislim, da ni dosegljiva v osnovni namestitvi, ampak je treba naložiti dodatno "Orodja za analizo"
Menu -> Orodja -> Dodatki -> Kljukico na -> Orodja za analizo. Verjetno pa bo zahteval namestitveni disk...

[jumanjy]

cedra
mislim, da se RANDBETWEEN spremeni vsakokrat, ko se list preračuna on pa bi imel rad fiksne številke.
jaz sem to rešil z macrom, ki sem ga prilepil kar v gumb in mi skopira samo ob kliku nanj.

Koda: Izberi vse

 Range("A1").Value = Range("B2").Value

[cedra]

cedra
mislim, da se RANDBETWEEN spremeni vsakokrat, ko se list preračuna on pa bi imel rad fiksne številke.

Res je! Lahko pa zdaj stolpec, kjer ima tiste ničle in enke, enostavno kopira in s posebnim lepljenjem vrednosti, dobi vrednosti, ki se ne bodo več spreminjale. Lahko si posname ali napiše makro, ki bo to naredil.

[LOGITECH]

Hmm, najbrž sem preveč komplicirano vprašal.
Moja želja je, da EXCEL recimo v 3 od 5 celic (od A1 do E1) naključno razmeče števila od 1 do 3 in sicer tako, da je njih vsota vedno 5. V ostalih celicah so ničle ali pa prazna polja.

Primeri od 1) -4):
Celice A1 B1 C1 D1 E1
1) 1 0 0 3 1
2) 0 0 1 3 1
3) 1 2 0 0 2
4) 0 1 0 1 3

Pozdrav!

[cedra]

Tole sem spravil skupaj na brzino:

Koda: Izberi vse

Sub nakljucno()

Dim i, j, x As Integer
Randomize
ponovi:
For j = 1 To 5
    Cells(1, j) = 0
    Next j
x = 0
    For i = 1 To 5
        Cells(1, i) = Int(Rnd * 4)
            x = x + Cells(1, i)
                If x = 5 Then Exit For
                If x > 5 Then GoTo ponovi
    Next i
                If x < 5 Then GoTo ponovi

End Sub

Upam, da bo v redu...

[LOGITECH]

Tole načeloma res deluje. Sicer pa ste kodo tako lepo predstavili, da jo bom lahko uporabil še
za nekatere druge možnosti, če pa ne pa .
Res hvala