ist es möglich einen Namensbereich so anzulegen dass er für die gesamte Spalte A gilt bis auf die 1. Zeile (Kopfzeile)?
Gruß
yummi
PS: Eine andere Möglichkeit als = A2:A2^64 ;-)
With Range("A2")
ActiveWorkbook.Names.Add Name:="MeinName", RefersTo:=Range(.Address, .End(xlDown))
End With
Viele Grüße
With Range("A2")
ActiveWorkbook.Names.Add Name:="MeinName", RefersTo:=Range(.Address, Cells(ActiveSheet. _
Rows.Count, .Column))
End With
Viele Grüße
=Index(Tabelle1!$A:$A;2):Index(Tabelle1!$A:$A;Zeilen(Tabelle1!$A:$A))
dieser Name geht aber tatsächlich bis zur letzten Zeile des Gesamten Blattes und ist damit in der Regel nicht sinnvoll.=INDEX(Tabelle1!$A:$A;2):INDEX(Tabelle1!$A:$A;VERWEIS(2;1/(Tabelle1!$A:$A"");ZEILE(Tabelle1!$A:$A)) )
=Index(Tabelle1!$A:$A;2):Index(Tabelle1!$A:$A;Anzahl2(Tabelle1!$A:$A))
ThisWorkbook.Names.Add "DeinName", Range("A2:A" & Cells(Rows.Count, 1).end(xlup).Row)
ThisWorkbook.Names.Add "DeinName", Intersect(Me.Usedrange, Me.Usedrange.Offset(1, 0)).Columns(1) _
Gruß Daniel