vba: Rückkehr Wörterbuch-Funktion

dieser beschreibt, was ich versuche zu tun.

dies ist nicht für mich arbeiten, und es ist unklar, warum.

vielen Dank im Voraus für jegliche Hilfe.

        Sub mySub()
        dim myDict as Dictionary
            myDict=new Dictionary

                myDict=myFunc()

        End Sub

        Function myFunc()
            dim myDict2
                set myDict2 = new Dictionary

                    'some code that does things and adds to myDict2'

            myFunc=myDict2
        End Function
InformationsquelleAutor jason m | 2010-10-27
  1. 31

    Benötigen Sie das SET-Schlüsselwort, wenn Sie die Zuweisung einer Objekt statt einer Wert:

        Sub mySub()
        dim myDict as Dictionary
        set myDict = myFunc()
    End Sub

    Function myFunc() as Dictionary
        dim myDict2 as Dictionary
        set myDict2 = new Dictionary
                'some code that does things and adds to myDict2'
        set myFunc=myDict2
    End Function

    Ihre ursprüngliche code war auch die Schaffung myDict als ein neues Dictionary-Objekt, dann sofort ersetzen Sie es mit einem anderen. Sie können einfach überspringen Sie diesen Schritt.

    • dieser arbeitet mit einer leichte Veränderung, wenn Sie myFunc(1)=myDict2. aber dann schafft dies eine unendliche Schleife.
    • Nein, es ist nicht eine unendliche Schleife. myFunction = Value (oder SET myFunction = Object) ist das VBA-äquivalent RETURN Value
    • Und Sie wollen nicht myFunc(1)= möchten Sie nur myFunc=, sonst bist du nur den ersten Wert des Wörterbuchs zu den ganzen anderen Objekt, das ist nicht, was Sie wollen.
    • ja die "Set myFunction=Obj" ist der code, der benötigt wurde. vielen Dank für die Zeiger
    • Mit dem gleichen code..bin ich immer der Fehler benutzerdefinierter Typ nicht definiert.Bitte helfen
    • Sorry, @user3206357, ich weiß nicht, etwas über die Objekt-Bibliotheken, die dieses ursprünglichen Benutzers installiert hatte, oder ob "Wörterbuch" ist ein benutzerdefiniertes Objekt, das er definiert sich selbst. Ich war nur die Korrektur eines syntax-Fehler hatte er, wenn Sie versuchen, um return das Objekt.
    • Sie benötigen zum importieren von "microsoft scripting runtime". siehe stackoverflow.com/questions/3233203/...

    InformationsquelleAutor BradC
Schreibe einen Kommentar