Top-Themen

AppleEntwicklungHardwareInternetLinuxMicrosoftMultimediaNetzwerkeOff TopicSicherheitSonstige SystemeVirtualisierungWeiterbildungZusammenarbeit

Aktuelle Themen (A bis Z)

Administrator.de FeedbackApache ServerAppleAssemblerAudioAusbildungAuslandBackupBasicBatch & ShellBenchmarksBibliotheken & ToolkitsBlogsCloud-DiensteClusterCMSCPU, RAM, MainboardsCSSC und C++DatenbankenDatenschutzDebianDigitiales FernsehenDNSDrucker und ScannerDSL, VDSLE-BooksE-BusinessE-MailEntwicklungErkennung und -AbwehrExchange ServerFestplatten, SSD, RaidFirewallFlatratesGoogle AndroidGrafikGrafikkarten & MonitoreGroupwareHardwareHosting & HousingHTMLHumor (lol)Hyper-VIconsIDE & EditorenInformationsdiensteInstallationInstant MessagingInternetInternet DomäneniOSISDN & AnaloganschlüsseiTunesJavaJavaScriptKiXtartKVMLAN, WAN, WirelessLinuxLinux DesktopLinux NetzwerkLinux ToolsLinux UserverwaltungLizenzierungMac OS XMicrosoftMicrosoft OfficeMikroTik RouterOSMonitoringMultimediaMultimedia & ZubehörNetzwerkeNetzwerkgrundlagenNetzwerkmanagementNetzwerkprotokolleNotebook & ZubehörNovell NetwareOff TopicOpenOffice, LibreOfficeOutlook & MailPapierkorbPascal und DelphiPeripheriegerätePerlPHPPythonRechtliche FragenRedHat, CentOS, FedoraRouter & RoutingSambaSAN, NAS, DASSchriftartenSchulung & TrainingSEOServerServer-HardwareSicherheitSicherheits-ToolsSicherheitsgrundlagenSolarisSonstige SystemeSoziale NetzwerkeSpeicherkartenStudentenjobs & PraktikumSuche ProjektpartnerSuseSwitche und HubsTipps & TricksTK-Netze & GeräteUbuntuUMTS, EDGE & GPRSUtilitiesVB for ApplicationsVerschlüsselung & ZertifikateVideo & StreamingViren und TrojanerVirtualisierungVisual StudioVmwareVoice over IPWebbrowserWebentwicklungWeiterbildungWindows 7Windows 8Windows 10Windows InstallationWindows MobileWindows NetzwerkWindows ServerWindows SystemdateienWindows ToolsWindows UpdateWindows UserverwaltungWindows VistaWindows XPXenserverXMLZusammenarbeit
GELÖST

Worddok. per Makro nach drucken schließen

Frage Entwicklung VB for Applications

Mitglied: Hatl

Hatl (Level 1) - Jetzt verbinden

08.06.2007, aktualisiert 11.06.2007, 9620 Aufrufe, 6 Kommentare

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
Mitglied: Guenni
08.06.2007 um 20:21 Uhr
@Hatl

Hi,

funktioniert, wenn auch der Druckbefehl
vom Makro ausgeht:

01.
Sub PrintClose() 
02.
    ActiveDocument.PrintOut 
03.
   ActiveDocument.Close 
04.
End Sub
Dann erstellst du in einer Symbolleiste einen Button, weist
diesem das Makro zu. Bei Klick wird gedruckt und geschlossen.

Gruß
Günni
Bitte warten ..
Mitglied: bastla
09.06.2007 um 20:45 Uhr
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:
01.
Sub FilePrint() 
02.
Ret = Dialogs(wdDialogFilePrint).Show 
03.
If Ret = -1 Then ActiveDocument.Close 'Dialog wurde mit OK beendet, daher sollte gedruckt worden sein 
04.
End Sub
Grüße
bastla
Bitte warten ..
Mitglied: Guenni
10.06.2007 um 18:44 Uhr
@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

Gruß
Günni
Bitte warten ..
Mitglied: bastla
10.06.2007 um 18:51 Uhr
@Günni

da kann man mal sehen, wie wertvoll es ist, internes über Software zu wissen.
"Wissen" ist zu viel gesagt - hatte es vor einiger Zeit im Web gefunden und mich errinnert, dass da was war ...

Grüße
bastla
Bitte warten ..
Mitglied: Hatl
11.06.2007 um 11:09 Uhr
Hallo!

Vielen Dank, ist genau was ich brauche und funktioniert wunderbar!

lg
Bitte warten ..
Mitglied: Hatl
17.08.2011 um 10:09 Uhr
Bitte warten ..
Ähnliche Inhalte
VB for Applications
gelöst VBA-Makro verschwindet nach Speichern (5)

Frage von lupi1989 zum Thema VB for Applications ...

Outlook & Mail
gelöst Outlook 2016 Postfächer lassen sich nicht schließen (16)

Frage von master3477 zum Thema Outlook & Mail ...

JavaScript
gelöst Per JavaScript ein ID-Element schließen (9)

Frage von Peter32 zum Thema JavaScript ...

Neue Wissensbeiträge
Mac OS X

Apple hat macOS High Sierra veröffentlicht

(1)

Information von Frank zum Thema Mac OS X ...

Viren und Trojaner

Ransomware or Wiper? RedBoot Encrypts Files but also Modifies Partition Table

(4)

Information von BassFishFox zum Thema Viren und Trojaner ...

Notebook & Zubehör

WOL bei HP Notebooks

(7)

Erfahrungsbericht von Henere zum Thema Notebook & Zubehör ...

Heiß diskutierte Inhalte
Windows 10
gelöst Netzwerkkarte schaltet sich erst nach dem Logon ein (24)

Frage von DerWoWusste zum Thema Windows 10 ...

Windows Server
Seit IP Umstellung DC DNS Fehler (22)

Frage von Yaimael zum Thema Windows Server ...

Grafik
gelöst CAD Arbeitsplätze (17)

Frage von Diddi93 zum Thema Grafik ...

Weiterbildung
gelöst Fest angestellter Admin oder Systemhaus Admin mit Kundenbetreuung? (16)

Frage von Voiper zum Thema Weiterbildung ...