Hallo,
ich habe ein Makro für eine Seitennummerierung. Man gibt die Seitenzahl an, mit der die Nummerierung beginnen soll, und die Endseitenzahl. Das Makro fügt dann an der richtigen Stelle die Seitenzahl ein, druckt die Seite, schließt die Seite und wiederholt dies bis die Endseitenzahl erreicht ist.
Aufgrund eines Fehlers in VBA Basic wirbelt das Makro aber alle Seitenzahlen durcheinander, wenn die Seitenanzahl größer als 10 ist. D. h., bisher rufe ich das Makro also ggfls. mehrfach auf, was natürlich unpraktisch ist.
Wenn ich jetzt von Seite 1 bis 112 nummerieren will, muss ich eine Schleife programmieren, die z. B. erst die Seiten 1 bis 9 druckt, dann die Seiten 10 bis 19 usw., bis die Seite 109 erreicht ist. Danach müssen noch die Seiten 110 bis 112 gedruckt werden.
Mit der "round"-Funktion kann eine Variable erstellt werden, die feststellt, wie oft die Schleife durchlaufen werden muss. In diesem Falle wäre das 11 mal.
Ist die Verwendung von "round" richtig? Beispiel: zaehler = Round(endzahl / 10, 0)
Hat jemand eine elegante Lösung für die Schleife?
Viele Grüße
Andreas
|