Hallo christian87,

Probier doch mal folgendes:
DIM I As Byte
For I = 1 to 10

'Hier steht Dein Code

Next I

Im ersten Durchlauf ist I=1 und wird bei jedem Next I um 1 erhöht, solange bis I = 10 ist.
Danach wird die Schleife verlassen und mit den befehlen nach NExt I weitergemacht.

Gruß
m.artmann