Live-Forum - Die aktuellen Beiträge
Datum
Titel
17.10.2025 10:28:49
16.10.2025 17:40:39
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Forumthread: Wert aus A1 in Textfeld zurückgeben

Wert aus A1 in Textfeld zurückgeben
06.03.2006 14:32:10
Jakob
Hallo,
wie lautet der Code wenn ich mir den Inhalt aus der Zelle A1 in ein Textfeld zurückgeben lassen will?
Mit folgenden Code klappt es nicht:

Private Sub TxtA1_Change()
Me.TxtA1.Value = [a1]
End Sub

Danke und Gruß
J.Freitag
Anzeige

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Wert aus A1 in Textfeld zurückgeben
06.03.2006 14:41:40
ede
hallo,
ich verstehe zwar den zweck nicht, aber bei mir gehts so:

Private Sub TextBox1_Change()
TextBox1.Value = Sheets("Tabelle1").Cells(1, 1)
End Sub

gruss
AW: Wert aus A1 in Textfeld zurückgeben
06.03.2006 14:53:52
Jakob
Hallo ede,
klappt leider nicht. Ist das nicht eingentlich dergleiche Code wie meiner nur anders geschrieben?
Zweck des ganzen ist, das ich den Benutzern schon einen Wert vorgeben will (Faxnummer), aber dieser auch bei nicht zutreffen überschrieben werden kann.
Gruß
J.Freitag
Anzeige
AW: Wert aus A1 in Textfeld zurückgeben
06.03.2006 14:57:26
ede
hallo nochmal,
also wenn du die textbox vorbelegen möchtest, dann solltest du die zuweisung
im activat-ereignis deiner userform machen.
im change-ereignis der textbox kann sonst nie der text überschrieben werden, da er ja immer wieder aus A1 zugewiesen wird!
rückmeldung wäre nett
Anzeige
AW: Wert aus A1 in Textfeld zurückgeben
06.03.2006 16:02:00
Jakob
Hallo ede,
und da kommt mein nächstes Problem ins Spiel. Er gibt mir nur ein Wert zurück wenn vor den Start dort ein Wert gestanden hat. Dieses Feld wird aber erst nach den Start der Userform und Eingabe in ein 2. Textfeld gefüllt. Gibt es dafür eine Möglichkeit/Ereignis?
Gruß
J.Freitag
Anzeige
AW: Wert aus A1 in Textfeld zurückgeben
06.03.2006 19:08:29
Beni
Hallo Jakob,
beim verlassen der zweiten Textbox.
Gruss Beni

Private Sub TextBox2_Exit(ByVal Cancel As MSForms.ReturnBoolean)
TextBox1.Value = Sheets("Tabelle1").Cells(1, 1)
End Sub

;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige