Antwort
Lösung in VBA
Sub AlleBlätterDrücken()
ActiveWorkbook.PrintOut
End Sub
Oder
Sub AlleBlätterDrücken()
ThisWorkbook.PrintOut
End Sub