Supportnet / Forum / Tabellenkalkulation

Hallo, ich bin ein unwissender in der Programmierung von VisualBasic und lediglich im Stande bereits vorhandenes etwas zu ändern. Links, Verweise etc. Jetzt habe ich die Aufgabe bekommen ein Makro abzuändern, das bewirkt, dass mehrere Dokumente aus Excel heraus gleichzeitig gedruckt werden. Der Einfachheit halber ist in jeder Excel-Mappe nur eine Tabelle enthalten, so dass nur eine Tabelle gedruckt werden muss. Nun ist leider ein Störenfried dabei. Diese Excelmappe enthält mehrere Tabellen (Worksheets), die alle ausgedruckt werden müssen. [b]Mein bisheriger Code lautet:[/b] ...filename = "xxx" ActiveWindow.SelectedSheets. Print Out. Copies = 1 ActiveWindow.Close. (False) Nun muss ich anstatt von SelectedSheets, das Worksheet einfügen. Wie lautet dafür der Befehl und wie kann ich alle andereren Worksheets ebenfalls mitausdrucken. Danke im Voraus. Ivy

Moin efeu,

folgendes druckt alle Blätter einer Mappe:

Sub Drucken()
ActiveWindow.SelectedSheets.PrintOut From:=1, To:=Sheets.Count, _
Copies:=1, Collate:=True
End Sub

Sollen nicht alle Blätter gedruckt werden, kann man das durch verändern der Werte hinter "From" - "To" entsprechend anpassen.

MfG

Jörg

Hallo efeu,

war völlig falsch was ich oben geschrieben habe.

Um die gesamte Mappe zu drucken musst du dies verwenden:

ActiveWorkbook.PrintOut Copies:=1, Collate:=True


MfG

Jörg

• Excel Makro in viele Excel Files exportieren
• hat jemand ahnung von verweisfunktionen in excel
• Excel 2002 Dateien in Excel 2007 für MS Vista Home Premium
• Absturz von Powerpoint UND Excel