PDA

Vollständige Version anzeigen : Inhalt der Zelle via Zufall


franksen
16.09.2011, 14:13
Liebes Forum,

ich werde irgendwie nicht so richtig fündig....habe eine Tabelle mit verschiedenen Infos in 3 Spalten und möchte (ähnlich einem Vokabeltrainer) ein Feld haben, wo der Inhalt irgendeine Zelle per Zufall sucht.
Am liebsten noch nen Button nebendran, wo ich auf Knopfdruck einen neuen Zufallswert bekomme. Kann jemand helfen?

Danke und Gruß
franksen

EarlFred
16.09.2011, 14:31
Hallo franksen,

sowas?
Sub franksen()
Dim rngQuelle As Range
Set rngQuelle = Range("A1:C1234")
Range("D1") = rngQuelle(Int(rngQuelle.Count * Rnd) + 1)
Set rngQuelle = Nothing
End Sub

Den Button dazu schaffst Du sicher alleine...

Grüße
EarlFred

franksen
16.09.2011, 14:40
genau so! Danke und ein schönes WE
jepp, Button ging....