Soru Hücredeki tutarın textboxa farklı gelmesi

[sirkülasyon]

Private Sub TextBox21_Change()
TextBox21 = Format(CDbl(TextBox21.Text), "#,##0.00")
End Sub

UserForm_Initialize kısmında da uyguladım ama
Hücre değeri 1505,40
Textbox21 değeri 15054,00

formatında geliyor bu durumu nasıl düzeltebilirim?

 

[asi_kral]

Merhaba

Format(Range("C4"), "#,##0.00")

Bu şekilde dener misiniz?

 

[sirkülasyon]

olmadı ustam ya

 

[Seyit Tiken]

Nokta ile virgülü bir yer değiştirin.

 

[sirkülasyon]

Seyit abi
Bilgisayar ondalık formatı farklı bir format değil ama onu da denedim. Yine olmadı.
Birçok textbox var, sadece bir textboxta hata var

 

[Orion1]

Örnek dosya eklerseniz iyi olur.

 

[Orion1]

Formatı change olayına değilde after update olayına yazıpta deneyiniz.

 

[Seyit Tiken]

Benim bahsettiğim, koddaki virgül ile noktanın yer değiştirilmesi.

 

[sirkülasyon]

Evren ve Seyit Uzmanıma Çok çok teşekkür ederim. Allah razı olsun. Sıkıntım giderildi.

 

[Orion1]

Evren ve Seyit Uzmanıma Çok çok teşekkür ederim. Allah razı olsun. Sıkıntım giderildi.

Nasıl yaptınız?
Konuyu takip edenlerde öğrensinler.

 

[sirkülasyon]

Evren abi

Private Sub TextBox21_Change()
TextBox21 = Format(CDbl(TextBox21.Text), "#,##0.00")
End Sub
formatını

Private Sub TextBox21_AfterUpdate()
TextBox21 = Format(CDbl(TextBox21.Text), "#,##0.00")
End Sub

olarak değiştirdim.

 

[Orion1]

Format ayni kalmış.Değiştirilmemiş.!