- Katılım
- 14 Eylül 2004
- Mesajlar
- 100
- Excel Vers. ve Dili
- Excel 2002 - Türkçe
Arkadaşlar misler gibin çalışıyordu. Birşeyler oldu ve hata verdi. Textboxa harf girince sorun yok fiyat1_keypress çalışıyor ama rakam girince
hatası veriyor ve formatı seçili hale getiriyor. Acaba Ne yaptımda böyle bir hata veriyor. Yardımcı olursanız sevinirim.
Kod:
Compile Error :
can't find project or library
Kod:
Private Sub fiyat1_Change()
fiyat1.Value = Format(fiyat1, "###,###")
End Sub
Private Sub fiyat1_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger)
If KeyAscii < Asc(0) Or KeyAscii > Asc(9) Then
KeyAscii = 0
Beep
End If
End Sub