Datenbereich per Makro benennen

Namen helfen beim Einsatz von Formeln

Namen sind leichter lesbar als Bereiche. Indem Sie einem Bereich wie beispielsweise A1:B14 den Namen "Quellbereich" geben, können Sie in Formeln anschließend mit diesem Namen anstelle der Bereichsadresse arbeiten.

Bei der interaktiven Arbeit mit Excel legen Sie Namen über das Kommando "Einfügen - Namen" fest, aber wie machen Sie das in einem Makro?

Schauen Sie sich die Tabelle in der Abbildung an. Sie zeigt eine kleine Liste. Diese Liste soll per Makro einen Namen erhalten:

Das folgende Makro zeigt, wie es geht:

Sub TaufeBereich()
 Dim Bereich As Range
 Set Bereich = ActiveSheet.UsedRange
 ActiveSheet.Names.Add Name:="Quellbereich", RefersTo:=Bereich
End Sub

Nach dem Start legt das Makro für den benutzen Beriech im aktiven Tabellenblatt den Namen "Quellbereich" fest. Das Ergebnis ist die Benennung des Bereichs A1:B14 der Liste mit dem Text "Quellbereich". Die folgende Abbildung zeigt das Ergebnis:

Wenn Sie anstelle des aktuell verwendeten Bereichs einen bestimmten anderen Bereich mit einem Namen belegen möchten, passen Sie die Wertzuweisung an die Variable Bereich im Makro an.

Tipp: Falls Sie wissen möchten, wie Sie Makros in Excel eingeben und starten, finden Sie hier eine Kurzbeschreibung: http://www.exceldaily.de/excel-makros-vba/artikel/d/so-geben-sie-makros-in-excel-ein.html