ich habe noch eine Frage. Wie kann man den Wert einer Zelle in eine TextBox einlesen.
Vielen Dank für die Hilfe
Gruß
Konrad
Sheets("TabellenName").Range("Zellenreferenz") = TextBox1.Value
GreetZ Renée
Textbox1.text = Sheets("Tabelle1").Cells(1,1).text
den Zellwert explizit in die Textbox einlesen und ebenso wieder zurückschreiben:
Sheets("Tabelle1").cellls(1,1).value = Textbox1.Text
Gruß, Daniel
Private Sub TextBox1_Change()
Application.EnableEvents = False
Range("A2") = TextBox1.Value
TextBox1.SetFocus
Application.EnableEvents = True
End Sub
Private Sub TextBox1_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger)
Range("A4") = TextBox1.Value
End Sub
Private Sub TextBox1_KeyUp(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer)
Range("A3") = TextBox1.Value
End Sub
Private Sub TextBox1_MouseUp(ByVal Button As Integer, ByVal Shift As Integer, ByVal X As Single, _
ByVal Y As Single)
Range("A1") = TextBox1.Value
End Sub
Gruß
Reinhard
da nutzt dir LinkedCell sowieso nix. Damit wird ja in eine zelle etwas ausgegeben, du willst das ja umgekehrt.
Das ist so nicht ganz richtig
Egal ob nun eine Änderung in der Textbox oder auch in der Zelle getätigt wird.
Es ist miteinander verlinkt. Das sagt schon der Name LinkedCell
Änderst Du die Zelle erscheint in der Box auch der Wert der Zelle
Änderst Du die Box erscheint in der Zelle auch der Wert der Box !
Gruß Matthias