Userform (simple)

Bonsoir,
Alors c'est mon premier "userform" donc rester indulgent svp.

J'ai 1 problème et 1 amélioration a faire sur mon userform

l'userfoarm comprend 2 boutons (1 annuler et 2 valider)
et 3 textbox (1 quantités, 2 vitesse, 3 temps)

Le problème d'abord :
dans la "textbox 3" la valeur est écrite en "€" je voudrais un simple nombre et je voudrais qu'il n'y aie pas de limite de virgule ",0000000100250548 ect"

L'amélioration :
Si possible je voudrais que dans la "textbox 2" une valeur s'inscrivent automatiquement
cette valeur devrait provenir de la feuille active.
(RECHERCHEV($B[n°ligne de la cellule active];$L$3:$BC$8;41;FAUX)

et voici mon code actuelle :

Private Sub CommandButton1_Click()

Unload UserForm1

End Sub

Private Sub CommandButton2_Click()

ActiveCell.Value = TextBox3.Value
UserForm1.SetDefaultTabOrder
UserForm1.Hide


End Sub

Private Sub TextBox1_Change()



End Sub

Private Sub TextBox2_Change()

TextBox3.Value = ""
If TextBox2.Value = "" Then
TextBox3.Value = ""
Else
TextBox3.Value = FormatCurrency(TextBox1.Value / TextBox2.Value, 2)

End If

End Sub

Private Sub TextBox3_Change()

End Sub

D'avance un grand merci a celui qui pourra m'aider :)