Thema Datum  Von Nutzer Rating
Antwort
25.06.2020 09:21:18 Peter
NotSolved
25.06.2020 09:46:00 Mase
NotSolved
25.06.2020 10:15:32 Gast40474
NotSolved
25.06.2020 23:41:29 ralf_b
NotSolved
Rot Private Sub Workbook_BeforePrint in addin nutzen
26.06.2020 09:29:51 Mase
NotSolved
01.07.2020 13:19:17 Peter
NotSolved
01.07.2020 13:21:26 Mase
NotSolved

Ansicht des Beitrags:
Von:
Mase
Datum:
26.06.2020 09:29:51
Views:
618
Rating: Antwort:
  Ja
Thema:
Private Sub Workbook_BeforePrint in addin nutzen

Folgendes kommt in den Codebereich "Diese Arbeitsmappe" Deines Addins:

Option Explicit
'
Public o As clsPrintOut
'

Private Sub Workbook_Open()
    Set o = New clsPrintOut
End Sub

In Deinem AddIn gibt es ein Klassenmodul mit dem Namen clsPrintOut.

Dessen Codebereich hat nun folgenden Inhalt:

Option Explicit
Public WithEvents app As Excel.Application

Private Sub Class_Initialize()
    Set app = Application
End Sub

Private Sub Class_Terminate()
    Set app = Nothing
End Sub

Private Sub app_WorkbookBeforePrint(ByVal Wb As Workbook, Cancel As Boolean)
    'Hier Dein Code
    'Mit der Objektvariablen Wb hast Du eine Referenz auf das betroffene Workbook
End Sub

 


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
25.06.2020 09:21:18 Peter
NotSolved
25.06.2020 09:46:00 Mase
NotSolved
25.06.2020 10:15:32 Gast40474
NotSolved
25.06.2020 23:41:29 ralf_b
NotSolved
Rot Private Sub Workbook_BeforePrint in addin nutzen
26.06.2020 09:29:51 Mase
NotSolved
01.07.2020 13:19:17 Peter
NotSolved
01.07.2020 13:21:26 Mase
NotSolved