Office: Bereichsnamen vergeben via VBA

Hallo liebe Excel-Freunde *Smilie

ich bin auf der Suche nach einer Möglichkeit, via VBA
in Excel Bereichsnamen zu vergeben
statt -Einfügen -Name - definieren
1- Name in der Arbeitsmappe: (händische Erfassung) Zellinhalt der Zelle C8
2- Bezieht sich auf: (markieren mit der Maus) =Tabelle1!$B$10:$E$1000

In der Zelle C8 steht ein Text - dass soll der Name in der Arbeitsmappe werden
Der Bereich "Bezieht sich auf" soll fest definiert sein - nämlich B10:E1000

Der Tabellenblatt-Name ist dabei immer unterschiedlich (wird lfd. geändert)

Ist das mit VBA möglich ? Wenn ja - wie ?

Freue mich auf einen Tip *Smilie
Gruß Stefan

ps: Ach ja - arbeite mit Excel 2003

:)

 

Hi Stefan,

hast du den Code zum Erstellen eines Namen schon mal mit dem Makrorekorder aufgezeichnet?

 

Hallo Karin,
Danke für die schnelle Antwort !
Ja , das habe ich ! Das ergab
ActiveWorkbook.Names.Add Name:="Test", RefersToR1C1:= _
"=Tabelle1!R10C2:R1000C5"
Dabei musst ich aber den Namen (hier als Beispiel "Test") manuell erfassen
Und der Bereich "Tabelle1" ist auch nicht "fest" definiert, sondern ändert sich

Gruß
Stefan

 

Hallo,
Code kommt ins Modul des Blattes:

 

Hallo Steffen
toll - superschnelle Antwort *Smilie
Ich habe den Code in "Tabelle1" eingefügt und ausgeführt!
Der Code erstellt einen Namen *Smilie und fügt als "bezieht sich auf"
=Tabelle1.Range("$B$10:$E$1000")
ein.
Er müsste aber
=Tabelle1!$B$10:$E$1000
einfügen, damit ich später per sverweis
auf die Daten zurückgreifen kann.
Mit dem =Tabelle1.Range("$B$10:$E$1000")
funktioniert das leider nicht.
=SVERWEIS(G4;Test;3;FALSCH)
Ergibt #NAME?
als Ergebnis *frown.gif*

Hast Du noch einen Tip ?
Gruß
Stefan

 

sorry,war "Altlast" ;-)

 

Hi Stefan,
Code:

 

Hallo Karin,
hallo Steffen

*Smilie)) WOW
dafür gibt es für Beide
* * * * * 5 Sterne !
Klasse Lösungen !

Danke und einen wunderschönen Abend noch.
Besten Dank
Stefan

 

Hallo zusammen,

vielleicht noch als Ergänzung:
Namen können entweder in der ganzen Mappe verfügbar sein, oder aber nur auf Ebene des Arbeitsblattes.
Der Name, der über vorstehende Codes generiert wird, gilt in der gesamten Arbeitsmappe.

Noch ein weiterer Hinweis: Die Referenz muss nicht als String zusammengesetzt werden, es werden auch Bereichsbezüge akzeptiert:
Code:

Finde ich persönlich etwas übersichtlicher - ist aber Geschmackssache. Funktionieren tut beides.

Code:

definiert einen Namen auf Ebene des Tabellenblattes. Das kann mal von Vorteil sein, wenn man den gleichen Namen mit unterschiedlichen Bezügen auf verschiedenen Blättern nutzen will (die Formeln also nicht jedesmal anpassen muss).

Grüße
EarlFred

 

Hallo EarlFred
vielen Dank für Deine zusätzlichen Erläuterung !
... ich kann noch viel lernen *wink.gif*
Nice Weekend
Stefan