Benanntenbereich über Variable ansprechen
06.11.2007 15:14:21
Reinhard
wie bzw. kann ich überhaupt einen benannten Bereich "Bereich1" über eine Variable "Bez" ansprechen der ich den Wert "Bereich1", also den Bereichsnamen, zugewiesen habe?
Option Explicit
'
Sub tt()
Dim Bez 'As String
ActiveWorkbook.Names.Add Name:="Bereich1", RefersToR1C1:="=Tabelle1!R1C1"
Bez = "Bereich1"
[Bez] = "abc" ' kein Fehler, aber nichts sichtbares passiert
'["Bez"] = "abc2" '424 Objekt erforderlich
'Range("Bez") = "def" '1004 Range fehlgeschlagen
'Range(Bez) = "ghi" '1004 Range fehlgeschlagen
' Funktioniert:
ActiveWorkbook.Names.Add Name:="Bereich2", RefersToR1C1:="=Tabelle1!R2C1"
[Bereich2] = "abc"
End Sub
Danke ^ Gruß
Reinhard