Dictionary als Objekt
08.03.2017 13:00:48
Tom
würde gerne nach Schreiben von dSammlung. das Add vorgeschlagen bekommen.
Außerdem würde ich gerne wissen, wie dSammlung am Besten definiert werden soll?
Sicher, mit
Dim dSammlung As Object
geht es, aber es ist doch ein Dictionary. Wäre doch besser es mit As Dictionary zu definieren, oder? Aber dann kommt eine Fehlermeldung.
Code:
Set dSammlung= CreateObject("Scripting.Dictionary")
For Each nFamily In ActiveWorkbook.Names
With nFamily
dSammlung.Add .Name, .RefersToRange
End With
Next
(Ob dieser Code im Forum gut dargestellt wird, weiss ich nicht. In der Vorschau tut er das jedenfalls leider nicht)
Gruß, Tom