Excel standard auswahl druckmodus ändern
Ich soll für meine Chefin mehrere dutzend Ordner voller Excel-Blätter drucken. So, dachte ich, ist ja ganz leicht: Alles im Ordner markieren, rechtsklick drucken.
Mein Problem: Er druckt immer nur das erste Tabellenblatt aus.
Beispiel: In einem Ordner sind 3 Mappen mit jeweils 5 Reitern. Ich markiere alle Mappen--> rechtsklick-->Drucken. Jetzt druckt er zwar die 3 Mappen; aber jeweils nur 1 und nicht 5 Reiter aus!
Ich hoffe, dass mir jemand bei dem Probelm helfen kann. Ich habe nämlich keine Lust mehrere Hundert Dokumente einzeln, per Hand auf zu rufen.
Eine andere Möglichkeit wäre es, die Standardeinstellung zu ändern (von "Ausgewähltes Blatt" auf "Gesamte Mappe")! Weis jemand wie man das so ändert, dass als Vorauswahl "Gesamte Mappe" angekreuzt ist?
1 Antworten zur Frage
Videos zum Thema
YouTube Videos
Excel: Standard Auswahl im Druckmodus ändern
Es gibt eine Möglichkeit:
Erstellen sie eine Excel Datei und kopieren sie dort in VBA foglenden Code:
Sub Ausdrucken("Verzeichnis:", "Welches Verzeichnis?", Default:=CurDir)
If Pfad = "" Then Exit Sub
With Application.FileSearch
.NewSearch
.FileType = msoFileTypeExcelWorkbooks
.LookIn = Pfad
.SearchSubFolders = True
If.Execute 0 Then
For zähler = 1 To.FoundFiles.Count
Workbooks.Open Filename:=.FoundFiles.Item
Application.DisplayAlerts = False
ActiveWorkbook.PrintOut Copies:=1, Collate=True
ActiveWorkbook.Save
ActiveWorkbook.Close
Next zähler
End If
End With
End Sub
Dann nur noch das Makro starten und das Verzeichniss angeben wo die Datein zu finden sind. Danach auf OK klicken und Kaffee trinken gehen.
!Achtung!
Dieses Makro startet sofort den Druck auf den Standarddrucker, also haben sie auch genug Papier eingelegt.
Hans
Das Makro durchsucht nur den angegebenen Ordner und druckt dort alle Datein aus. unterordner werden nicht berücksichtigt