verwende eine Inputbox, so etwa:
Sub Eingabe()
Dim Text As String
Text = InputBox("Wert eingeben")
Range("a1").Value = Text
End Sub
Gru? Heinz
Sub Eingabe()
Dim Text As String
Text = InputBox("Wert eingeben")
Range("a1").Value = Text
End Sub
Private Sub TextBox1_Change()
[a1] = TextBox1.Value
End Sub
Private Sub TextBox1_LostFocus()
'Irgendwelche g?ltigkeiten pr?fen
[a1] = TextBox1.Value
End Sub
Sub Eingabe()
Dim Text As String
Text = InputBox("Wert eingeben")
Range("a1").Value = Text
End Sub
Private Sub TextBox1_Change()
[a1] = TextBox1.Value
End Sub
Private Sub TextBox1_LostFocus()
'Irgendwelche g?ltigkeiten pr?fen
[a1] = TextBox1.Value
End Sub
Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden
Suche nach den besten AntwortenEntdecke unsere meistgeklickten Beiträge in der Google Suche
Top 100 Threads jetzt ansehen