Zwei Makros behindern sich....
04.03.2004 17:18:55
Burkhard
ich habe eine Userform, auf der sich mehrere Textboxen befinden. In Textbox3 soll ein Produkt stehen, das sich aus dem Inhalt von Textbox1 und Textbox2 multipliziert. Wenn ich auf den Button "Texbox leeren" klicke, meckert er und springt in die Vb-Umgebung. Warum? Kann mir jemand helfen?
Private Sub Textbox1_Change()
If Me.TextBox2 <> "" Then
Me.TextBox3.Value = Me.TextBox1.Value * Me.TextBox2.Value
End If
End Sub
Private Sub Textbox2_Change()
If Me.TextBox1 <> "" Then
Me.TextBox3.Value = Me.TextBox1.Value * Me.TextBox2.Value
End If
End Sub
Privat Sub Cmd_leeren_Click()
Dim ObCb As Object
For Each ObCb In Me.Controls
If TypeName(ObCb) = TextBox Then OBCb.Value =
Next ObCb
End Sub