Soru Textbox format

[sirkülasyon]

Private Sub TextBox1_Exit(ByVal Cancel As MSForms.ReturnBoolean) prosedur kısmına
365 ya da 452 gibi üç haneli rakam girdiğim zaman 3,65 veya 4,52 gibi
Private Sub TextBox2_Exit(ByVal Cancel As MSForms.ReturnBoolean) prosedur kısmına
3659 ya da 4522 gibi dört haneli rakam girdiğim zaman 36,59 veya 45,22 gibi
olmasını nasıl sağlayabilirim?

 

[Orion1]

Buyurun.

Private Sub TextBox1_AfterUpdate()
If Len(TextBox1.Value) = 3 Then TextBox1.Value = Format(TextBox1.Value / 100, "##0.00")
End Sub

 

[sirkülasyon]

Sağ olasın Evren abi
Teşekkür ederim

 

[Orion1]

İyi çalışmalar.