Thema Datum  Von Nutzer Rating
Antwort
Rot Fotokopien mit Seitenzahlen versehen (Word)
09.10.2019 11:54:11 Andreas
NotSolved
09.10.2019 12:39:33 Gast29612
NotSolved

Ansicht des Beitrags:
Von:
Andreas
Datum:
09.10.2019 11:54:11
Views:
25
Rating: Antwort:
  Ja
Thema:
Fotokopien mit Seitenzahlen versehen (Word)
Hallo, die Aufgabe: für eine Akten wurden Fotokopien gefertigt. Diese sollen oben rechts nummeriert werden, Z. B. von 20 bis 88. Per Hand eine nervige Sache. Mit diesem Makro geht es eingeschränkt: Sub InsertTextAtEndOfDocument() i = 0 For i = 20 To 29 ActiveDocument.Content.InsertAfter Text:=i ActiveDocument.PrintOut Range:=wdPrintCurrentPage Selection.GoTo wdGoToPage, wdGoToAbsolute, i Selection.Bookmarks("\Page").Range.Delete Next i End Sub ' geht nur für jeweils 10 Seiten, sonst Zahlendreher Der Fehler ergibt sich aus dem Kommentar. Word bzw. VBA druckt die Seitenzahlen wild durcheinander, sofern mehr als 10 Seiten zu bedrucken sind. Wo liegt hier der Fehler? Viele Grüße Andreas

Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst genau und ausführlich
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
  • Bitte markieren Sie Ihre Anfrage als erledigt wenn Ihnen geholfen wurde
Thema: Name: Email:

 
 

Thema Datum  Von Nutzer Rating
Antwort
Rot Fotokopien mit Seitenzahlen versehen (Word)
09.10.2019 11:54:11 Andreas
NotSolved
09.10.2019 12:39:33 Gast29612
NotSolved