Live-Forum - Die aktuellen Beiträge
Datum
Titel
25.04.2024 23:47:55
Datum ausweisen, wenn definierte Summe erreicht ist
25.04.2024 21:40:53
Excel Datenquelle aus dem Web mit Anmeldung?
25.04.2024 21:21:16
Zellkommentar in UserForm anzeigen und bearbeiten
25.04.2024 21:13:13
Kalenderwochen addieren
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1472to1476
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1472to1476
1472to1476
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Automatisch nach einem bestimmten Makro drucken

Automatisch nach einem bestimmten Makro drucken
14.02.2016 23:34:30
Mario
Hallo zusammen,
ich habe mit dem Excel-Recorder einige Auswertungen für die Arbeit erstellt und möchte gerne, dass zum Ende der "Wochenauswertung" automatisch ein Ausdruck erstellt wird. Meine Liste besteht aus 14 Tabellen. Eine Gesamtübersicht, 12 Arbeitsplätze und die letzte Tabelle (Register) ist die Verwaltung über die sämtliche Eingaben erfolgen. Diese Seite soll nicht gedruckt werden. Sprich nur Tabelle 1-13. Gibt es da eine Lösung?
Vielen Dank im Voraus schon mal!
Gruß Mario

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Automatisch nach einem bestimmten Makro drucken
18.02.2016 07:21:34
Werner
Hallo Mario,
entweder die Blätter die gedruckt werden sollen in ein Array
Public Sub drucken()
ThisWorkbook.Sheets(Array("TabEingabe", "TabAusgabe")).PrintOut 'weitere Blätter ergänzen
End Sub
oder als Schleife über die Blätter
Public Sub drucken()
Dim i As Long
For i = 1 To 12
Sheets(i).PrintOut
Next i
End Sub
Und dann das Makro zum Drucken am Ende deines Makros für die Wochenauswertung mit Call drucken aufrufen.
Gruß Werner
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige