Hi ,
Wie ermittle ich die letzte zeile in einem Druckbereich? Dabei kann die anzahl der zeilen variable seine da man die zeilenhöhe verändern kann? Gruss Micha
Hallo Micha! zB.so. Sub letzte_zeile_druckbereich() Dim rng As Range Set rng = Range(ActiveSheet.PageSetup.PrintArea) MsgBox rng(rng.Cells.Count).Row EndSub Code eingefügt mit: Excel Code Jeanie Gruß Sepp
Anzeige
AW: letzte Zeile in Druckbereich
Panicman
Hallo Micha,
Der Druckbereich ist ein Name!!! Adresse Erste Zelle: =ZELLE("Adresse";Druckbereich) Adresse Letze Zelle: {=ADRESSE(MAX(ZEILE(Druckbereich));MAX(SPALTE(Druckbereich)))} Erste Zeile: {=MIN(ZEILE(Druckbereich))} Letzte Zeile: {=MAX(ZEILE(Druckbereich))} Erste Spalte: {=MIN(Spalte(Druckbereich))} letzte Spalte: {=Max(Spalte(Druckbereich))} Achtung Matrixformeln!!!
Gruß Holger