Protzente
19.01.2009 13:58:00
SoulOpa
Ich habe eine Frage warum dieser Code unten einen Laufzeitfehler Nr.13 meldet? Typen unverträglich.
Private Sub CommandButton1_Click()
Sheets("Rechnung").Activate
Range("Q317") = TextBox1.Value ' Zahlungsziehl in Userform übertragen()
Range("U317") = Left(TextBox5.Value, 2) / 100 ' Mwst in Userform Eintragen()
Range("S317") = Left(TextBox3.Value, 2) / 100 ' Skonto in Userform Eintragen()
Unload Me
End Sub
In U317 und S317 sollen Skonto und Mwst in Protzent beerechnet und zugleich auch angezeigt werden. So bald mann in U317 o. S317 abändert von TextBox5.Value, 2 auf eins stellt funktioniert es aber wenn beide auf 2 stehen kommt der Fehler. Ich möchte aber in beiden Feldern einen wert über 10% einstellen können und da muss die Code stelle auf 2 stehen.
Gibt es dafür eine eine Lösung? wenn ja würde ich mich auf eine Info Freuen.
mfg Andi