Private Sub Text1_Change()
Text1 = Format(Text1, "#,##0.00")
Text1.SelStart = Len(Text1.Text)
End Sub
yapamadım yav, şöyle ekleyince olmuyor hata veriyorText1 = Format(Text1, "#,##0.00") ama Text1.Text = Format(Text1.Text, "#,##0.00") şeklinde ekleyince hata yok ama bu sefer de kutucuktaki değer otomatik olarak #,##0.00 böyle çıkıyor. event falan mı eklemme gerek?
zaten text1.change eventında olması gerekiyor. çok uzun süredir kullanmıyorum. hatırladığım özelliğe internette nbaktım ben de böyle hatırlıyorum kulanışılını.
bu kodu direkt form1 in içine atın başka bir fonksiyonun altına eklemeden.
yok valla yapamadım team viewer ile bağlanıp bakabilir misin?