Thema Datum  Von Nutzer Rating
Antwort
26.03.2023 09:34:47 cmon
NotSolved
26.03.2023 14:05:43 ralf_b
NotSolved
26.03.2023 14:24:30 Gast81776
NotSolved
26.03.2023 14:32:32 ralf_b
NotSolved
Rot Druckbereich per VBA Makro festlegen
27.03.2023 00:40:50 xlKing
NotSolved

Ansicht des Beitrags:
Von:
xlKing
Datum:
27.03.2023 00:40:50
Views:
303
Rating: Antwort:
  Ja
Thema:
Druckbereich per VBA Makro festlegen

Hi, welches andere Forum, wurde das dort schon gelöst? Ist eigentlich ziemlich simpel. Den folgenden Code einfach ins Modul "DieseArbeitsmappe" legen:

Private Sub Workbook_BeforePrint(Cancel As Boolean)
  If ActiveSheet.Name = "AusdruckTrennblatt" Then
    dbarr = Split(Range("I2"), ";")
    For Each Db In dbarr
      ActiveSheet.PageSetup.PrintArea = Db
      Application.EnableEvents = False
      ActiveSheet.PrintOut
      Application.EnableEvents = True
    Next Db
    Cancel = True
  End If
End Sub

Sobald man auf Drucken geht, sollten die Bereiche aus I2 nacheinander abgeklappert und gedruckt werden, sofern die Namen existieren und einem Bereich zugeordnet wurden.

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
26.03.2023 09:34:47 cmon
NotSolved
26.03.2023 14:05:43 ralf_b
NotSolved
26.03.2023 14:24:30 Gast81776
NotSolved
26.03.2023 14:32:32 ralf_b
NotSolved
Rot Druckbereich per VBA Makro festlegen
27.03.2023 00:40:50 xlKing
NotSolved