in einer Produktübersicht möchte ich, dass ab Spalte M immer nur 6 weitere Spalten gedruckt werden.
Grundsätzlich könnte ich das per Makro so einstellen:
Columns("T:T").Select
ActiveWindow.SelectedSheets.VPageBreaks.Add Before:=ActiveCell
Columns("Z:Z").Select
ActiveWindow.SelectedSheets.VPageBreaks.Add Before:=ActiveCell
Allerdings habe ich das Problem, dass ich manchmal Spalten ausblenden möchte und dann dieses Makro nicht mehr passen würde.Wie kann ich die eingeblendeten Spalten zählen, so dass nach der Spalte M immer 6 Spalten gezählt und dann ein Seitenumbruch gemacht wird?
Gruß
Rainer