Zufallszahlen
23.11.2015 19:32:25
Bonduca01
ich erstelle folgendermaßen Zufallszahlen:
Sub...
With Range(Cells(4, 5), Cells(Cells(2, 12), Cells(2, 8) + 4))
'Füge zufällig 0 und 1 hinzu
.Formula = "=IF(RAND()Nun möchte ich den Wert 0,7 durch eine Variable austauschen.
Z.B:
Sub....
Belegung = 1/2
With Range(Cells(4, 5), Cells(Cells(2, 12), Cells(2, 8) + 4))
'Füge zufällig 0 und 1 hinzu
.Formula = "=IF(RAND()Hier bekomme ich einen Fehlerwert.
Weis jemand wie ich die Variable da einbauen kann?
(Ich benötige leider eine VBA Lösung)
Danke!!