Ich habe eine umfangreiche Datei, die eine Reihe von Diagrammen und Tabellen enthält.
1. Einige dieser Diagramme sollen gedruckt werden.
2. Ein Tabellenausschnitt soll gedruckt werden-> dieser ist über Druckbereich festlegen Da die Datei auf verschiedenen Rechnern läuft mit unterschiedlichen Druckern, ist "nur" der jeweilige Standarddrucker zu wählen. (Die Einstellung eines Druckers als Standarddrucker ist überall sichergestellt)
Um jedes Diagramm einzeln zu drucken, dachte ich mir folgendes:
Public Sub DRUCKEN()
Sheets("Hinweis").Select
ActiveSheet.Shapes.Range(Array("Chart 1","Chart 2")).Select
Selection.PrintOut Copies:=1, Collate:=True
Sheets("Übersicht").Select
Range("A11:B20").Select
Section.PrintOut Copies:=1
End Sub
Problem: Laufzeitfehler 424 - Objekt erforderlich
Ich kann mit dieser Meldung leider nix anfangen...
Aber es hat doch bestimmt jemand eine ganz tolle Idee!
Vielen, vielen Dank
Gruß Jana