In Textbox Werte automatisch ausgeben
07.08.2007 22:16:00
Herbst
ich hoffe mir kann hier jemand weiterhelfen. Ich bin beim durchforsten des Archivs leider nicht auf eine Lösung meines Problems gestoßen.
Ich möchte aus einer Textbox einen Wert auslesen und diesen in einem Tabellenblatt abspeichern. Dies habe ich auch hin bekommen. Anschließend möchte ich in einer weiteren Textbox einen Wert ausgeben der automatisch angezeigt wird und bei Änderung seines Wertes automatisch in der Textbox aktualisiert wird. Dies funktioniert leider nicht. Der Wert wird nur angezeigt wenn ich in der Textbox einen Buchstaben eingebe. Den Code habe ich unten angefügt. Ich bin für jede Hilfe und Anregung dankbar.
Gruß
Michael
Private Sub TextBox81_Change()
TextBox81.Text = Sheets("Daten").[H17]
End Sub