Dies ist mein erster Eintrag! Ich freue mich hier zu sein und hoffe Hilfe zu bekommen. gruss lütti
Sub Druckbereich_anpassen()
for each w_sheet in ActiveWorkbook.Sheets
w_sheet.PageSetup.PrintArea = (Deine Vorgaben)
next w_Sheet
End Sub
Viel Erfolg, Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden
Suche nach den besten AntwortenEntdecke unsere meistgeklickten Beiträge in der Google Suche
Top 100 Threads jetzt ansehen