Dieses Forum nutzt Cookies
Dieses Forum verwendet Cookies, um deine Login-Informationen zu speichern, wenn du registriert bist, und deinen letzten Besuch, wenn du es nicht bist. Cookies sind kleine Textdokumente, die auf deinem Computer gespeichert werden. Die von diesem Forum gesetzten Cookies werden nur auf dieser Website verwendet und stellen kein Sicherheitsrisiko dar. Cookies aus diesem Forum speichern auch die spezifischen Themen, die du gelesen hast und wann du zum letzten Mal gelesen hast. Bitte bestätige, ob du diese Cookies akzeptierst oder ablehnst.

Ein Cookie wird in deinem Browser unabhängig von der Wahl gespeichert, um zu verhindern, dass dir diese Frage erneut gestellt wird. Du kannst deine Cookie-Einstellungen jederzeit über den Link in der Fußzeile ändern.

Druck mehrerer Arbeitsmappen inkl. pdf
#1
Hallo zusammen,

da ich ein absoluter Excel-Nullblicker bin, bzw nichts mit VBA etc. anfangen kann, meine Bitte um Hilfe an Euch!

Ich habe verschiedene Excel Dateien die jeweils mehrere Arbeitsmappen enthalten.

Die enthaltenen Daten (Excel Tabellen) bleiben zu 90 % unverändert, der Rest ändert sich jeweils.
Das was geändert wird betrifft dann in jeder der enthaltenen Arbeitsmappen die gleichen Felder. 

Damit nicht jede Mappe separat ausgefüllt werden muss, habe ich in der ersten Mappe ein Menü erstellt, das die dort eingetragenen Daten in die zugewiesenen Felder in Arbeitsmappe 2,3+4 usw. einträgt und bei Aktivierung des eingerichteten "Drucken-Makros" alle Arbeitsmappen auf einmal druckt.

Nun würde ich gerne noch eine pdf-Datei als weitere Arbeitsmappe einfügen, was auch über "Einfügen-Objekt" funktioniert. Dass dabei nur das Verknüpfungssymbol angezeigt wird ist kein Problem.

Nun soll genau diese pdf-Datei zusammen mit den anderen Arbeitsmappen über den Drucken Button in der ersten Arbeitsmappe der Datei zum Drucken angestoßen werden und das klappt nicht.

Könnt Ihr mir vielleicht sagen wies geht?

Vielen Dank & Grüße
Emma
Antworten Top
#2
Hallo Emma,

zeigt deinen bisherigen Code.
Gruß Stefan
Win 10 / Office 2016
Antworten Top
#3
Hi Stefan,

anbei entsprechende Scrrenshots.

Grüße
Emma


Angehängte Dateien Thumbnail(s)
       
Antworten Top
#4
Hallo Emma,

in welchem Tabellenblatt befindet sich dein pdf-Dokument? Und teste mal den Code.

Code:
Sub prcEmma()
  Dim lngC As Long
  Dim vntBlaetter As Variant
 
  'die Auswahlliste, welche Tabellenblätter gedruckt werden sollen
  vntBlaetter = Array("F0", "F2", "UMSP")
 
  'Schleife über die Liste
  For lngC = 0 To UBound(vntBlaetter)
     Worksheets(vntBlaetter(lngC)).PrintOut
  Next lngC
End Sub
Gruß Stefan
Win 10 / Office 2016
Antworten Top


Gehe zu:


Benutzer, die gerade dieses Thema anschauen: 2 Gast/Gäste