Office: Zufällige Zellauswahl

Hallo zusammen,
ich möchte eigentlich nur eine Zufällige Zelle anwählen. Dafür generier ich zwei Zufallszahlen im Bereich 1 - 9. Bekomme dann aber einen Laufzeitfehler....?


Randomize

i = Int((9 * Rnd) + 1)
e = Int((9 * Rnd) + 1)

Cells(i, e).Select

Kann mir jemand sagen was ich falsch mache?

Gruß
Totti

:)

 

Hallo Totti,

der Code sollte funktionieren.

Ist das aktive Blatt ein Worksheet? Ist die Tabelle geschützt?




Gruß Sepp

 

ja, es ist ein Worksheet und die Tabelle ist auch nicht geschützt.
Wenn ich für e einen Zahlenwert eingebe funktioniert es auch. Aber mit zwei Zufallszahlen geht es nicht :-(

 

Moin, Totti,

eine Zufallszahl im Bereich von 1 bis 81 reicht doch aus, um dann die Zelle auszuwählen (Dein angegebener Code klappt bei meiner Version von Excel97 ohne Probleme, ich gehe davon aus, dass das bei Sepp auch der Fall gewesen ist):

Code:

Wobei das Auswählen von Zellen überflüssig ist und den Codeablauf verlangsamt (wir führen den Cursor nicht wie einen Hund über die Tabelle und durch die Mappe *wink.gif*)...

 

Hallo jinx,
ja, so klappt es :-)
Vielen Dank