Cita:
Iniciado por Monimo 
mitexto es una variable, sería la variable donde guardes el valor del importe o el texto al que le quieres cambiar la "," por el "." Pon el codigo de como estas usando format currency.
Hola que tal de nuevo muchas gracias por tu ayuda, has sido muy amable...
mira aqui te pongo todo lo que llevo y como estoy aplicando el formatcurrency
con lo que llevo ya pude convertir los textos en numeros.
Private Sub CommandButton1_Click()
Selection.EntireRow.Insert
TextBox1 = Empty
TextBox2 = Empty
TextBox3 = Empty
TextBox1.SetFocus
End Sub
Private Sub TextBox1_Change()
Range("A7").Select
Val (TextBox1.Text)
ActiveCell.FormulaR1C1 = TextBox1.Text
End Sub
Private Sub TextBox2_Change()
Range("B7").Select
cantidad = Val(TextBox1.Text)
PrecioU = Val(TextBox2.Text)
ActiveCell.FormulaR1C1 = TextBox2.Text
Rem aqui pongo la multiplicacion haber que pasa
importe = cantidad * PrecioU
TextBox3.Text = importe
End Sub
Private Sub TextBox3_Change()
Range("C7").Select
importe = FormatCurrency(importe, 2)
ActiveCell.FormulaR1C1 = TextBox3.Text
End Sub