Dialogtext in Tabelle
28.06.2002 13:52:37
Peter
ich schreibe gerade mein ersten Dialog und wollte den Text aus dem Eingabefeld an eine Tabelle übergeben.
Bisher sieht der OK Knopf so aus:
Sub Schaltfläche2_BeiKlick()
Sheets("Werte").Select
Range("a1").Select
Do Until ActiveCell.Value = ""
ActiveCell.Offset(1, 0).Range("a1").Select
Loop
ActiveCell.Value = ??????????.Text
ActiveCell.Offset(0, 1).Range("a1").Select
TextBox1.SetFocus
End Sub
Was muss ich bei ????? angeben? Habe es mit vielen Variationen ausprobiert.
Vielen Dank Peter