Worddok. per Makro nach drucken schließen

Hallo!

Vielleicht kann mir jemand weiterhelfen.
Ich möchte gern ein Worddokument automatisch schließen, nachdem es vom User entweder über Datei -> Drucken oder über den „Druck – Button“ von Word ausgedruckt wurde.
Also mein Problem dabei ist herauszufinden ob das Dokument gedruckt wurde.
Das schließen des Dokumentes würde ja einfach über ActiveDocument.Close gehen.

Hat jemand einen Tipp für mich?

Vielen Dank!

lg

Bitte markiere auch die Kommentare, die zur Lösung des Beitrags beigetragen haben

Content-ID: 60856

Url: https://administrator.de/contentid/60856

Ausgedruckt am: 22.11.2024 um 21:11 Uhr

6 Kommentare

Neuester Kommentar

@Hatl

Hi,

funktioniert, wenn auch der Druckbefehl
vom Makro ausgeht:

Sub PrintClose()
    ActiveDocument.PrintOut
   ActiveDocument.Close
End Sub

Dann erstellst du in einer Symbolleiste einen Button, weist
diesem das Makro zu. Bei Klick wird gedruckt und geschlossen.

Gruß
Günni

Hallo Hatl und Günni!

Wenn das Makro "Sub FilePrintDefault()" heißt, wird damit der Klick auf das "Drucken"-Symbol der Standard-Symbolleiste abgefangen - ein eigenes Symbol ist dann gar nicht nötig.

Um den Menübefehl "Datei / Drucken" (bzw Strg-P) selbst abzuwickeln, muss das Makro "Sub FilePrint()" heißen und sinnvoller Weise auch den Standard-Druckdialog aufrufen, also etwa:

Sub FilePrint()
Ret = Dialogs(wdDialogFilePrint).Show
If Ret = -1 Then ActiveDocument.Close 'Dialog wurde mit OK beendet, daher sollte gedruckt worden sein  
End Sub

Grüße
bastla

@bastla

Hi,

da kann man mal sehen, wie wertvoll es ist, internes über Software
zu wissen.

Ich behelfe mir in solchen Fällen immer damit, dass ich ein Makro
aufzeichnen lasse, und es hinterher anpasse. Deshalb auch mein
bescheidenes Behelf-Makro