wie kann man einer bestimmten Zelle "sagen" das sie die aktuelle Seitenzahl, in der sie sich im moment befindet, anzeigt?
Geht das?
Danke
Marco
Geht das?
Danke
Marco
hier mal ein Beitrag aus einem anderem Forum von Heute
"hi gib diesen code in ein modul ein und dann sollte es gehen! allerdings nur, wenn du nur eine seite breit bist und die seiten untereinander stehen
Sub seitenzahl()
spalte = ActiveCell.Column
zeile = ActiveCell.Row
ActiveSheet.PageSetup.PrintArea = "$A$1:$a$" & Trim(CStr(zeile))
seite = ActiveSheet.HPageBreaks.Count + 1
ActiveSheet.PageSetup.PrintArea = ""
seiten = ActiveWindow.SelectedSheets.HPageBreaks.Count + 1
Cells(zeile, spalte) = seite & " von " & seiten
end sub
gruß
harry"
ich hoffe es klappt
Gruß hajo
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