Textfeld aus VBA heraus füllen
21.10.2017 18:20:32
Frank
ich verzweifle gerade an einer Kleinigkeit mit Formularen, die ich eigentlich nie nutze...
Ich habe verschiedene VBA-Prozeduren erstellt, die Daten aus Dateien importieren, in die gewünschten Arbeitsmappen bringen und sie nach meinen Vorgaben formatieren - alles prima soweit.
Nun wollte ich, um das Ganze doch noch ein wenig nett zu formatieren und die Prozeduren nicht über das Menü "Entwicklertools" aufrufen zu müssen, eine Arbeitsmappe als kleines User Interface verwenden. Mit den Buttons ist das kein Problem, das hat auf Anhieb funktioniert.
In einem ebenfalls eingefügten Textfeld wollte ich dann noch den Inhalt einer globalen Variable einfügen, wenn eine der verschiedenen VBA-Prozeduren gelaufen ist.
Eine normale Zelle in dieser Mappe mit dem Inhalt der Variable zu füllen, ist kein Thema:
Sheets("Control").Cells(14, 3).Value = MeineGlobaleVariable
Mit dem Textfeld gelingt es mir aber nicht, weil ich nicht verstehe, wie ich es korrekt ansprechen muss. Nachdem ich es eingefügt habe, steht im Bearbeiten-Feld:
=EINBETTEN("Forms.TextBox.1";"") und in den Eigenschaften "TextBox1"
Wenn ich im VBA-Code schreibe:
Sheets("Control").Forms.TextBox.1.Text = MeineGlobaleVariable
bekomme ich einen Kompilierungsfehler vom Editor, dass das Anweisungsende erwartet wird.
Wenn ich im VBA-Editor schreibe:
Sheets("Control").Forms.TextBox1.Text = MeineGlobaleVariable
bekomme ich bei der Ausführung die Fehlermeldung "Laufzeitfehler 438 - Objekt unterstützt diese Eigenschaft nicht."
Wenn ich das Sheet weglasse und schreibe:
Forms.TextBox1.Text = MeineGlobaleVariable
bekomme ich bei der Ausführung die Fehlermeldung "Laufzeitfehler 424: Objekt erforderlich".
Mehr Varianten fallen mir im Moment nicht ein und ich hoffe, jemand von Euch ist fit in diesen Dingen und kann mir sagen, wie ich es richtig ansprechen muss.
Danke!
Viele Grüße
Frank