Thema Datum  Von Nutzer Rating
Antwort
31.07.2012 10:38:19 Gast99056
NotSolved
22.08.2012 08:57:55 Gast76343
NotSolved
Rot Excel Speichern als pdf - Seitenumbrüche
 22.08.2012 12:32:49 Dekor
NotSolved

Ansicht des Beitrags:
Von:
Dekor		 Datum:
22.08.2012 12:32:49		 Views:
1850		 Rating:
     
Antwort:
  Ja
Thema:
Excel Speichern als pdf - Seitenumbrüche

Hallo Gast,

hier ein Ansatz...

    With Sheets("Tabelle1")
        'Standarddrucker sichern
        Dein_Standarddrucker = .ActivePrinter
        
        '
        ' >>>Dein_PDF_Drucker<<< durch den Druckernamen ersetzen!!!
        '
        .ActivePrinter = "Dein_PDF_Drucker"
        
        'Druckbereich festlegen:
        '
        ' >>>$A$1:$I$75<<< HIER!!! durch eine Logik füllen lassen!
        '
        ' z. B. nach den Seitenvorschub suchen lassen 
        '
        .PageSetup.PrintArea = "$A$1:$I$75"
        
        'Dateinamen mit drucken lassen, nach Geschmack
        .PageSetup.LeftFooter = Application.ActiveWorkbook.Path & Application.ActiveWorkbook.name
        
        'Drucken:
        .PrintOut
        
        'Druckbereich aufheben und ein bischen aufräumen
        .PageSetup.PrintArea = ""
        .PageSetup.LeftFooter = ""
        
        'Standarddrucker rücksichern
        .ActivePrinter = Dein_Standarddrucker
    End With

 

 

Gruß Detlev

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
31.07.2012 10:38:19 Gast99056
NotSolved
22.08.2012 08:57:55 Gast76343
NotSolved
Rot Excel Speichern als pdf - Seitenumbrüche
 22.08.2012 12:32:49 Dekor
NotSolved