Zufallszahlen
24.12.2020 14:17:26
Hans-Peter
Habe folgendes Makro zum Erzeugen von Zufallszahlen:
For Each Zelle In Range("A20:A25")
Zelle.Value = Int((6 * Rnd) + 1)
Next Zelle
ElseIf Target.Address = "$A$1" Then
Name = Range("A1").Text
funktioniert soweit, aber jetzt ist mir aufgefallen, dass beim Neustart des Programms das Makro mit den gleichen Zahlen beginnt wie beim letzten Start. Da ich die Zahlen für ein Spiel benötige , bräuchte ich aber sinnvollerweise jedesmal wirklich neue Zahlen. Geht das ?
Anzeige