Thema Datum  Von Nutzer Rating
Antwort
Rot Drucken Macro spinnt bei Drucken über PDF-Drucker
 03.09.2009 15:12:37 Philipp
NotSolved
10.09.2009 14:21:11 Philipp
NotSolved

Ansicht des Beitrags:
Von:
Philipp		 Datum:
03.09.2009 15:12:37		 Views:
2321		 Rating:
     
Antwort:
  Ja
Thema:
Drucken Macro spinnt bei Drucken über PDF-Drucker
Hallo zusammen,

habe folgednes Macro für Excel 2003 geschrieben.

Sub Alles_Drucken()

Application.ScreenUpdating = False 'Aktualisieren des Bildschirms unterdrücken

Sheets("Eingabeblatt").PageSetup.PrintArea = "$B$3:$M$16" 'Legt den Druckbereich und die Fußzeile fest
With Sheets("Eingabeblatt").PageSetup
.LeftFooter = Sheets("Eingabeblatt").Range("$E$7").Value
.CenterFooter = Sheets("Eingabeblatt").Range("$I$8").Value
.RightFooter = Sheets("Eingabeblatt").Range("$E$8").Value
End With

Sheets("Datenblatt").PageSetup.PrintArea = "$F$2:$R$114" 'Legt den Druckbereich und die Fußzeile fest
With Sheets("Datenblatt").PageSetup
.LeftFooter = Sheets("Eingabeblatt").Range("$E$7").Value
.CenterFooter = Sheets("Eingabeblatt").Range("$I$8").Value
.RightFooter = Sheets("Eingabeblatt").Range("$E$8").Value
End With

With Sheets("Grafische Auswertung").PageSetup 'Legt den Druckbereich und die Fußzeile fest
.LeftFooter = Sheets("Eingabeblatt").Range("$E$7").Value
.CenterFooter = Sheets("Eingabeblatt").Range("$I$8").Value
.RightFooter = Sheets("Eingabeblatt").Range("$E$8").Value
End With

Sheets(Array("Eingabeblatt", "Grafische Auswertung", "Datenblatt")).Select 'zu druckende Blätter auswählen

Application.Dialogs(xlDialogPrint).Show 'ruft den Drucken Dialog auf

Sheets("Eingabeblatt").Select 'Vorherige Auwahl aufheben

Application.ScreenUpdating = True 'Bildschirmaktualisierung wieder erlauben

End Sub


Alles funktinoiert einwandfrei. Möchte ich nun allerdings eine PDF-Datei mit einem PDF-Drucker erzeugen lassen, öffnen sich nach dem Bestätigen des Drucken Dialoges zwei "Speichern unter" Fenster. Über das Erste wird die Seite "Eingabeblatt" über das zweite die beiden restlichen Blätter abgespeichert????? Habe schon verschiedenste PDF Drucker ausgewählt und es sit immer das Gleiche.

Weiß jemand eine Lösung bzw. eine andere Möglichkeit bei Excel 2007 ein PDF zu erzeugen.


Danke
Philipp

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
Rot Drucken Macro spinnt bei Drucken über PDF-Drucker
 03.09.2009 15:12:37 Philipp
NotSolved
10.09.2009 14:21:11 Philipp
NotSolved