Gruppe
Allgemein
Bereich
Name
Thema
Beispiele für den Einsatz von Namen
Problem
In 7 Tabellenblättern wird gezeigt, wie mit benannten Bereichen und benannten Funktionen gearbeitet werden kann
Lösung
Darstellung nur anhand einer Beispielarbeitsmappe möglich.
ClassModule: DieseArbeitsmappe
Private Sub Workbook_Open()
Dim txt As String
On Error Resume Next
ThisWorkbook.Names("Extern").Delete
On Error GoTo 0
txt = "'" & ThisWorkbook.Path & "\[TestXL4.xls]Tabelle1'!$A:$B"
txt = "=VLOOKUP(Extern!IV1," & txt & ",2,0)"
ThisWorkbook.Names.Add "Extern", txt
End Sub