For I = 1 To 7
I = Rnd(6)
Na dann wünsch Ich Dir viel Glück das Du mal das Ende der For Schleife erreichst. So wird das nichts.