Ich habe ein Problem, dass die Schlüssel der verschachtelten Wörterbücher zur aufrufenden Unterfunktion zurückkehren. Es gibt die Laufzeitfehler ‚424‘ Objekt erforderlichSchlüssel aus verschachtelten Wörterbüchern zurückgeben excl vba
Set LoadCombinationDict = LCaseDict()
Set a = fs.CreateTextFile(file_name, True)
For Each LCKey In LoadCombinationDict.Keys
Line = LCKey
For Each AddnlKey In AddnlCaseDict.Keys
X = LoadCombinationDict(LCKey)(AddnlKey)
Line = Line & ";" & X
Next AddnlKey
a.WriteLine (Line)
Next LCKey
a.Close
Im Folgenden ist die Funktion, die eine verschachtelte Wörterbuch
Function LCaseDict() as Scripting.Dictionary
'Some Code to create nested dictionary
End Function
Das Wörterbuch funktioniert perfekt erstellen, wenn ich den obigen Code in der Sub-Funktion enthalten. Gibt es eine Möglichkeit, Schlüssel der Haupt- und verschachtelten Wörterbücher an die aufrufende Funktion in Excel VBA zurückzugeben?
Sie Rückkehr richtig das Wörterbuch richtig? In welcher Zeile tritt Ihr Fehler auf? – BruceWayne
Bitte zeigen Sie Ihren Code für LCaseDict und LoadCombinationDict. Was ist x? Auf welcher Zeile tritt der Fehler auf? – Absinthe
Der Fehler war in der Zeile X = LoadCombinationDict (LCKey) (AddnlKey). Dank Vorschlägen von Thomas hat es gut funktioniert. Zusätzlich setze ich die Variable "Line" nach jeder LCKey-Schleife zurück. – Raghu