"Replace" und wie im Excel 97?
Sergej
Private Sub TextBox1_Change()
Worksheets("Tabelle1").Range("A1") = Replace(TextBox1.Text, Chr(13), "")
End Sub
Bitte genau das gleiche ,aber für Excel 97, am besten für beide Versionen:
Excel 97 und 2000
Dank im Voraus