Komma og punktum - igen

TextBox3.Text = CStr(Cdbl(Replace(TextBox1.Text,",","."))+Cdbl(Replace(TextBox2.Text,",",".")))

Hvor skal koden lægges ind? på _Change?

Jeg vil nok gøre det noget lignende dette her:

Private Sub TextBox1_Exit(ByVal Cancel As MSForms.ReturnBoolean)
    CalculateTextBox3
End Sub

Private Sub TextBox2_Exit(ByVal Cancel As MSForms.ReturnBoolean)
    CalculateTextBox3
End Sub

Private Sub UserForm_Click()
    ' Fjerner brugerens mulighed for at skrive i dette felt
    Me.TextBox3.Enabled = True
End Sub

Private Sub CalculateTextBox3()
    Dim dValue1 As Double
    Dim dValue2 As Double
   
    dValue1 = 0
    dValue2 = 0
    If Not Len(Me.TextBox1.Text) = 0 Then
        dValue1 = CDbl(Replace(Me.TextBox1.Text, ",", "."))
    End If
   
    If Not Len(Me.TextBox2.Text) = 0 Then
        dValue2 = CDbl(Replace(Me.TextBox2.Text, ",", "."))
    End If
       
    If Not (Len(Me.TextBox1.Text) * Len(Me.TextBox2.Text) = 0) Then
        Me.TextBox3.Text = CStr(dValue1 + dValue2)
    End If
End Sub

Kanon, det var lige det der manglede :o)
P.S. Jeg skal helt sikkert hilse fra Anette hos Tack - når jeg sådan render ind i dig på nettet :o)

Tak - Nå det er den Have :-)