MAKRO einbremsen? :-)
Marcy
Randinformation
Ich pflege bei uns die Maschinenabnahmeprotokolle (MAP).
Diese sind in Excel aufgebaut.
In Tabelle1 ist das Inhaltsverzeichnis,
in Tabelle2 die Vormontage und so weiter.
Über Einfügen, Namen, Definieren (SeitenInMeinerTab) / Bezieht sich auf: =DATEI.ZUORDNEN(50) und den Formeln (=SeitenInMeinerTab+0*JETZT() ) in jedem Tabellenblatt, ziehe ich auf das Inhaltsverzeichnis die Seitenzahlen.
Da die MAP´s auf dem Firmenserver liegen, ist die Bearbeitung des MAP´s nervig, wenn die Berrechnung auf automatisch steht -> dauert zu lange. Aus diesem Grund habe ich auf manuell (F9) umgestellt.
Nach einer Änderung drücke ich F9, damit sich das Inhaltsverzeichnis anpasst.
Dann Drucken, PDF Creator, Gesamte Abreitsmappe.
In der Eile passiert es manchmal, dass ich F9 vergesse, oder sonstige Dinge.
Aus diesem Grund habe ich ein Makro aufgezeichnet (siehe unten)
Jetzt habe ich aber das Problem, dass er zu schnell geht.
Calculate (F9) benötigt etwas mehr Zeit.
Aus diesem Grund habe ich den Makro neu aufgezeichnet, indem ich Zelle C4 zusätzlich angeklickt habe.
Bringt aber auch nichts.
Das Problem
Wie kann ich das Makro erweitern, dass er Calculate erst kpl. ausführt? Die Berechnung wird nicht zuende ausgeführt und zeigt somit im PDF falsche Seitenzahlen an.
Danke schon mal
Marcy
Sub PDFDrucken()
' PDFDrucken Makro
' Makro am 22.02.2011 von wikonrad aufgezeichnet
' Tastenkombination: Strg+p
Calculate
Range("C4").Select
Application.ActivePrinter = "PDFCreator auf Ne01:"
ActiveWorkbook.PrintOut Copies:=1, ActivePrinter:="PDFCreator auf Ne01:", _
Collate:=True
End Sub