Zufallszahl aus bereich, außer 1 zahl
12.05.2020 13:59:02
Krausert95
ich habe folgendes Problem:
Ich suche eine zufallszahl aus den Zahlen 1 bis 4, außer der Zahl 2. Also dürfen nur 1, 3 oder 4 ausgegeben werden. Ich habe bisher aber keinerlei Lösung gefunden.
Momentan habe ich nur die Zufallszahl:
Zahl = Application.WorksheetFunction.RandBetween(1, 4)
Gibt's eine einfachere Lösung als danach mit If Abfragen zu überprüfen, ob zahl den Wert 2 hat und wenn ja es neu zu versuchen?
Danke schonmal an Alle.
Grüße Krausert95