letzte Zelle als Namenfeld in VBA deklarieren

Bild

Betrifft: letzte Zelle als Namenfeld in VBA deklarieren von: Mark
Geschrieben am: 23.03.2005 14:42:11

Hallo

Ich habe eine Liste in der es eine Spalte Datum gibt. Das Anfangsdatum steht immer oben und hat den Namen "Anfangsdatum". Die letzte Zelle dieser Spalte soll "Enddatum" heißen. Wie muss sowas in VBA aussehen?

Gruß und Danke
Mark

Bild


Betrifft: AW: letzte Zelle als Namenfeld in VBA deklarieren von: Tobias Marx
Geschrieben am: 23.03.2005 15:15:20

Servus!

Hiermit sollte es gehen:
Sub datum()
  rng = Application.Worksheets(acsheet).Range("B65536").End(xlUp).Row
  'angenommen, Spalte B ist die Datumsspalte
      ActiveWorkbook.Names.Add Name:="Anfangsdatum", RefersToR1C1:="=Tabelle1!R2C2"
      ActiveWorkbook.Names.Add Name:="Enddatum", RefersToR1C1:="=Tabelle1!R" & rng & "C2"
End Sub


Gruss

Tobias


Bild


Betrifft: AW: letzte Zelle als Namenfeld in VBA deklarieren von: Mark
Geschrieben am: 23.03.2005 15:35:09

Hi, leider läufts bei mir nicht. Ich bekomme einen Error...

Index ausserhalb des gültigen Bereichs


Bild


Betrifft: AW: letzte Zelle als Namenfeld in VBA deklarieren von: Reinhard
Geschrieben am: 23.03.2005 16:03:39

Hallo Mark,
probier das mal:
Sub datum()

rng = Application.Worksheets("Tabelle1").Range("B65536").End(xlUp).Row
'angenommen, Spalte B ist die Datumsspalte
ActiveWorkbook.Names.Add Name:="Anfangsdatum", RefersToR1C1:="=Tabelle1!R2C2"
ActiveWorkbook.Names.Add Name:="Enddatum", RefersToR1C1:="=Tabelle1!R" & rng & "C2"
End Sub

Viele Grüße
Reinhard


Bild


Betrifft: AW: letzte Zelle als Namenfeld in VBA deklarieren von: Mark
Geschrieben am: 23.03.2005 16:58:17

Hey, sieht gut aus. Zumindest in einem kurzen Test hat es funktioniert.
Morgen schau ich nochmal obs auch in meiner richtigen Datei funktioniert


VIELEN DANK
Mark


Bild


Betrifft: AW: letzte Zelle als Namenfeld in VBA deklarieren von: Mark
Geschrieben am: 23.03.2005 16:58:21

Hey, sieht gut aus. Zumindest in einem kurzen Test hat es funktioniert.
Morgen schau ich nochmal obs auch in meiner richtigen Datei funktioniert


VIELEN DANK
Mark


Bild


Betrifft: AW: letzte Zelle als Namenfeld in VBA deklarieren von: Mark
Geschrieben am: 24.03.2005 15:08:16

Hey, Es funktionert...

Allerdings gibt es ein Problem. Er bezeichnet zwar das letzte feld mit Inhalt als Enddatum, allerdings reicht es schon auch das da eine Formel steht. Kann man es irgendwie noch explizit so ausrichten, dass das Makro nur den Namen Enddatum setzt, wenn da auch wirklich eins drin steht???

Danke für die Hilfe und Frohe Ostern
Ciao Mark


 Bild

Beiträge aus den Excel-Beispielen zum Thema "letzte Zelle als Namenfeld in VBA deklarieren"