Nicht wirklich. ;) Bin hier blind deinem Beispiel gefolgt.
'Schleife beginnen
(oben,0 - unten,7).clear '(oben,Spalte A bis unten, Spalte G) soll gelöscht werden, aber Rahmenlinien beibehalten -> A8:G32
oben = oben + 31 'oben um 31 Zeilen nach unten verschieben
unten = unten + 31 'unten um 31 Zeilen nach unten verschieben
(oben,0 - unten,7).clear '(oben,Spalte A bis unten, Spalte G) soll gelöscht werden -> A39:G63
oben = oben + 32 'oben um 32 Zeilen nach unten verschieben (unregelmäßiger Abstand: 31, 32, 31, 32, ...)
unten = unten + 32 'unten um 32 Zeilen nach unten verschieben (unregelmäßiger Abstand: 31, 32, 31, 32, ...)
'Schleife wieder von vorne ohne "oben = 8 , unten = 32"
Im zweiten Fall ist keine Rede davon, das die Rahmenlinien beibehalten werden sollen.
Schön das es funktioniert und ich helfen konnte. Und umso besser noch, du hast was dazu gelernt. Was will man (ich) mehr ... :)
|