Private Sub UserForm_Initialize()
Dim namName As Name
For Each namName In ThisWorkbook.Names
Me.ListBox1.AddItem (namName.Name)
Next namName
End Sub
anzeigen lassen kann. Nun die Frage, bei der ich nicht weiter komme:Ist es möglich, über ein SUB nur die Bereiche des aktiven Tabellenblattes anzeigen zu lassen?
Ich habe es mit For Each namName In ThisWorkbook.ActiveSheet.Names erfolglos versucht. Das SUB läuft durch, zeigt aber kein Ergebnis.