benutzt Du die Variable "I " auch in einer Subroutine?
Wenn ja hängts daran, dass dort der Wert gesetzt
wird und die for-Next dann aufgrund des neuen Wertes
verlassen wird.