Bom dia!
To usando o seguinte código abaixo para textbox receber o valor no percent.

Private Sub txtTaxaDeDesconto_Exit(ByVal Cancel As MSForms.ReturnBoolean)
Me.txtTaxaDeDesconto.Value = Format(Me.txtTaxaDeDesconto.Value, "0%")
End Sub

Mas se eu digitar por exemplo 50 na textbox ele retorna 5000% dai da erro nos meus descontos, alguem poderia me ajudar a resolver esse problema até quando eu digito 5 o resultado vem como 500% e seria 5% que eu queria que aparece-se, eu uso a formula para meu calculo abaixo.

Private Sub chbTaxa_Click()
On Error Resume Next

If chbTaxa = True Then
txtValorComDesconto = Format(txtValorTotal - (txtValorTotal * txtTaxaDeDesconto / 100), "R$ #,###.00")
txtTaxaDeDesconto.ForeColor = &HFF&
Else
txtTaxaDeDesconto = Empty
txtTaxaDeDesconto.ForeColor = &H80000012
End If

End Sub