Aufruf sub aus einem anderen Modul

Habe ich eine einfache Function Test() im Module1 und ein Sub SubName() im Module2. Ich bin versucht zu rufen SubName() aus Function Test(). Wenn ich Typ:

Call Module2.SubName

- und Ausfahrt der roh -, ich bin immer ein Fehler:

Kompilieren-Fehler: Erwartet: Bezeichner

Wenn ich tippe einfach Module2 und setzen Stop bietet es mir die Namen der SubName in "Modul2". So sieht es es, aber sieht aus wie etwas fehlt in der syntax. Ich kann nicht herausfinden, was.

InformationsquelleAutor Iouri | 2015-03-26
  1. 0

    Einige weiterführende links :

    1. MSDN-Aufrufen von Sub-und Function-Prozeduren
    2. ALSO: Aufruf einer Sub in VBA
    3. ALSO-Was macht das Call-Schlüsselwort do in VB6?

    Lösung zu deiner Frage :

    Entweder Call SubName oder nur SubName.

    Testen:

    Nach einigen Tests, habe ich in der Lage den code zu knacken. Der Fehler ist NICHT die gleichen, die Sie bekommen, aber vielleicht bringen Sie uns näher an die Lösung.

    Bild von VBA:
    Aufruf sub aus einem anderen Modul

    • Warum denkst du, dass die Module2. Qualifikation ist die Ursache des Fehlers? Sie waren in der Lage, den Fehler zu reproduzieren? Ich war nicht sicher. Der OP-code, wie gepostet, funktioniert einwandfrei.
    • Gute Frage. Machte mir beim testen das problem aus der OP und es funktioniert für mich. So jetzt habe ich glaube nicht, dass die Module2. ist das problem. Ich falsch sprang zum Schluss.
    • denkst du, dass das problem kann verursacht werden, durch falsche Verwendung der Variablen-Namen?
    • Siehe das Bild, das ich Hinzugefügt, um zu verstehen, was ich meine.
    • Wahr - nicht eine Antwort. Ich habe unten einen Kommentar hinterlassen seinen post und nachdem er antwortet, kann ich vielleicht eine Antwort. Es ist ein work in progress.
    • Jungs, danke Euch allen. Es funktioniert wirklich nur durch die Verwendung eines sub-Namen, auch wenn es in einem anderen Modul. Obwohl, wenn es gibt zwei Sub-s mit dem gleichen Namen (im aktuellen Modul und einem in ein anderes), wird ausgeführt, die man in einem eigenen Modul. So wird es nicht gehen Sie zu einem anderen Modul. Wenn ich 2 externe Module mit dem gleichen Namen der Sub wird ein Fehler zurückgegeben "...Zweideutig..". Und das ist tarif. Die Frage ist: wie kann ich angeben, das Modul, von dem ich möchte, dass es zum ausführen der sub. Wenn ich die Modul.Subname, es gibt einen syntax-Fehler ("Erwartet: - Zeile oder label oder-Anweisung oder das Ende der Erklärung")

    InformationsquelleAutor Branislav Kollár
  2. 0

    Die Lösung ist einfach: verwenden Sie die Anweisung

    SubName

    und es werden genannt.

    Paar klärende Bemerkungen:

    • Keine Notwendigkeit für die Verwendung der Call-Anweisung. Wenn Sie das jedoch tun, müssen Sie Call SubName()
    • Wenn Sie rufen Sie eine sub mit Parametern verwenden SubName Param1 - oder rufen Sie Call SubName(Param1). Verwenden Sie nicht Subname(Param1)- wenn param1 ist ein Objekt, das übergeben wird, es die Standard-Eigenschaft auf den sub, nicht das Objekt (z.B. Subname (Range("A1")) übergibt den Wert der Zelle in der sub - aber nicht das Range-Objekt - Subname Range("A1") passieren das Range-Objekt.
    • Sie können auch Module2.SubName - dies ist jedoch nur erforderlich, wenn Sie mehrere SubName sub in verschiedene Module
    • Ich habe gerade versucht Call Module2.SubName mich und es funktionierte wie erwartet. Warum denken Sie, dass die Klammern () oder die Call oder die Module2. Qualifikation ist die Ursache des Fehlers? "nicht verwenden Subname(Param1)- wie dieses gewirkt wird, Param1 ein string!" Das ist nicht wahr. Probieren Sie es aus und überzeugen Sie sich selbst.
    • Helfen Sie sich selbst davon überzeugen: rufen Sie diese Sub asub(v): MsgBox TypeName(v): End Sub wie diese Sub test2(): asub (3.1415926): asub (True): asub (5): End Sub Keine Zeichenfolgen.
    • Guter Punkt, danke! Ich verdeutlichte meine Antwort - es ist nicht zu einem string CASTET, sondern vielmehr übergeben Sie die Standard-Eigenschaft eines Objekts. E. g. in deinem Beispiel asub Range("A1") wäre Range, aber asub (Range("A1")) wäre string oder double je nach Inhalt von A1.
    InformationsquelleAutor Peter Albert
Schreibe einen Kommentar