---

Excel 2003

Geht man im Explorer auf eine XLS und wählt im Kontextmenü "Print", dann wird immer nur das erste Blatt gedruckt  

Gibt es eine Möglichkeit, per Befehlszeile alle Blätter zu drucken? So ähnlich wie ..

Code:

---

excel.exe %1 -print -all

---

Peter

------------------
Für jedes Problem gibt es eine einfache Lösung.
Die ist aber meistens falsch. ;-)

[Diese Nachricht wurde von Peter2 am 18. Jul. 2012 editiert.]

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

http://www.excelforum.com/excel-general/546429-printing-all-sheets-from-explorer.html

kann es nur im Moment nicht ausprobieren, da bei mir der betreffende Eintrag geschützt ist.

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Danke - nach vielem Suchen und vielen Lösungen (VBS,. VBA, ..) ein ganz kleiner Eintrag...

Aber:
Ich habe das nicht über die Registry gemacht, sondern über die Dateierweiterungen.

Peter

------------------
Für jedes Problem gibt es eine einfache Lösung.
Die ist aber meistens falsch. ;-)

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

hmm, mittels vbs würde ja sowas gehen

Code:

---

Dim ex
Dim Datei
Dim Blatt

If WScript.Arguments.Count > 0 Then            ' Parameter prüfen
    Datei = WScript.Arguments(0)
    Else
    MsgBox "Es wurde keine Datei angegeben!"    ' bei Fehler, Meldung und beenden
    WScript.Quit
End If

Set ex = GetObject(Datei)                      ' Verbindung zu Excel

For Each Blatt In ex.Worksheets                ' alle Arbeitsblätter ausdrucken
    Blatt.PrintOut
Next

ex.Close                                        ' XL-Datei schließen

---

und wie hast du es nur über die Endung(Dateierweiterungen?) realisiert?

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Zitat:

---

Original erstellt von Thomas Harmening:
...und wie hast du es nur über die Endung(Dateierweiterungen?) realisiert?

---

Im Explorer mit "Extras - Ordneroptinen - Dateierweiterungen". Das ist bei XLS das "open", "print", "save as..." enthalten. Und da kann man entweder bei "Print" den Eintrag anpassen (wie oben) oder ein "Printalles" neu aufbauen. Das steht dann im Kontextmenu.

Peter

------------------
Für jedes Problem gibt es eine einfache Lösung.
Die ist aber meistens falsch. ;-)

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP