Wert in Textbox ändern
20.12.2002 17:02:03
WolfgangM
Ich habe ein Problem mit der Addition in eine Textbox.
ein Wert wird akzeptiert, die Addition aber nicht, dann
Laufzeitfehler 1004. ich komme nach stundenlanger Tests
nicht mehr weiter.kann mir jemand helfen ???
besten dank im vorraus
Gru? wolfgangM
mein Makro:
Private Sub TextBox2_Change()
TextBox2 = Application.Substitute(TextBox2, ",", ".")
Cells(ACTIVECELL.Row, 3) = "=0" & TextBox2.Value
Cells(ACTIVECELL.Row, 5).FormulaR1C1 = _
"=IF(RC[-2]>=319.56,RC[-2]-319.56,IF(RC[-2]<=319.56,""""))"
TextBox7 = Cells(ACTIVECELL.Row, 12)
End Sub