Error 13 en envío de datos desde UserForm

Gustavo, tengo un formulario en el que describo las características de un gasto, como fecha, titulo, descripción (todo ello en TexBox´s) un ComboBox para elegir a que centro contable imputo el gasto y finalmente otro TexBox para el importe.
Asimismo, tengo un CommandButton que la hacer click manda todos estos datos a una hoja de cálculo que se llama "Informe Final".
El problema que tengo es que a menos que tenga completo el TexBox de importe, siempre me sale la ventana de "Se ha producido el error "13" en tiempo de ejecución. El tipo no coincide".
Me gustaría que este error no aparezca en los caso que describo, ya que quiero que este formulario también sirviera para corregir el informe final por errores en el titulo o la descripción que pudiera tener.
El código del CommandButton es el siguiente:
Private Sub CommandButton1_Click()
If Sheets("Informe Final").ProtectContents = True Then
Sheets("Informe Final").Unprotect Password:="CIRIS2"
End If
Sheets("Informe Final").Range("B20") = ComboBox1.Text
Sheets("Informe Final").Range("C20").Value = TextBox5.Text
Sheets("Informe Final").Range("B11") = UserForm1.TextBox1.Text
Sheets("Informe Final").Range("b13") = UserForm1.TextBox2.Text
Range("G20").Select
Selection.NumberFormat = " #,##0.## "
Sheets("Informe Final").Range("G20") = CDbl(UserForm1.TextBox3.Value)
Sheets("Informe Final").Range("J11") = UserForm1.TextBox4
End Sub
Un saludo y gracias