ich suche nach einer Lösung, die mir alle Zellennamen des aktuellen Tabellenblattes wiedergibt. Leider habe ich nur eine Möglichkeit gefunden alle Zellennamen der gesamten Arbeitsmappe nennen zu lassen. Einfach "ActiveWorkbook" durch "ActiveWorksheet" zu ersetzen klappt leider nicht.
Sub Zellennamen_in_Tabelle_ermitteln()
Dim nm As Name
For Each nm In ActiveWorkbook.Names
MsgBox nm.Name
Next
End Sub
Wer hat eine Idee?
Viele Grüße
Martin