Was möchtest du genau machen?
I = 1to2 ??
wenn du die Variable I von 1 bis 2 hochzählen wilst,
gehört sie in eine For Next Schleife.

Dim I As Byte

For I = 1 to 2
Next i

Gruß,MX3