Thema Datum  Von Nutzer Rating
Antwort
06.04.2018 10:11:06 Simon
NotSolved
06.04.2018 13:29:24 xlKing
NotSolved
07.04.2018 15:28:21 Simon
NotSolved
07.04.2018 18:06:49 xlKing
NotSolved
Rot Word 2016 Dokument drucken
 07.04.2018 18:38:45 xlKing
NotSolved
13.04.2018 09:40:05 Gast33328
NotSolved

Ansicht des Beitrags:
Von:
xlKing		 Datum:
07.04.2018 18:38:45		 Views:
462		 Rating:
     
Antwort:
  Ja
Thema:
Word 2016 Dokument drucken

Mir fällt grad noch auf, dass die Abfrage u.U. auch für jedes Andere Dokument kommen dürfte. Falls zusätzlich zu Diesem noch weitere Dokumente geöffnet sind, aber nur für dieses Eine vor dem Drucken gefragt werden soll, brauchst du eine zusätzliche Bedingung:

Public WithEvents App As Application

Private Sub Document_Open()
  Set App = Application
End Sub

Private Sub App_DocumentBeforePrint(ByVal Doc As Document, Cancel As Boolean)
  If Doc.Name = ThisDocument.Name Then
    frage = MsgBox("Wollen Sie wirklich drucken?", vbYesNo + vbQuestion, "Drucken")
    If frage = vbNo Then Cancel = True
  End If
End Sub

Gruß Mr. K.

Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • 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
Thema: Name: Email:



  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • 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

Thema Datum  Von Nutzer Rating
Antwort
06.04.2018 10:11:06 Simon
NotSolved
06.04.2018 13:29:24 xlKing
NotSolved
07.04.2018 15:28:21 Simon
NotSolved
07.04.2018 18:06:49 xlKing
NotSolved
Rot Word 2016 Dokument drucken
 07.04.2018 18:38:45 xlKing
NotSolved
13.04.2018 09:40:05 Gast33328
NotSolved