kayıt gezinti olayının yapısı

[takoo]

ya arkadaşlar önce selam diyeyim de,gerçekten forumu bayağı araştırdım ama brtane var ve onada cevap gelmemiş.yardımcı olursanız çok sevinirim.dosyam ektedir. sorunum ; kayıt butonları oluşturup hücrelerde düzenleme yapmak ve texbox'un bitanesine de , hücredeki "para birimi " formatının aynısını uygulamak,size zahmet bi bakar mısınız,şimdiden teşekkürler,iyi çalışmalar

 

[N.Ziya Hiçdurmaz]

yanıt

Bu şekil bir deneyin.

Private Sub CommandButton1_Click()
ActiveCell.Offset(-1, 0).Select
End Sub
Private Sub CommandButton2_Click()
ActiveCell.Offset(1, 0).Select
End Sub
Private Sub CommandButton4_Click()
ActiveCell.Offset(0, -1).Select
End Sub
Private Sub CommandButton5_Click()
ActiveCell.Offset(0, 1).Select
End Sub
Private Sub tex1_Change()
[C9] = tex1.Value
End Sub
Private Sub tex2_Change()
tex2 = FormatNumber(tex2)
[D9] = tex2.Value
End Sub

 

[Orion1]

Merhaba.
Ekli dosyayı inceleyiniz.

 

[takoo]

çok teşekkür ederim,sağolun varolun arkadaşlar,iyi çalışmalar

 

[Seyit Tiken]

Bizde ufak bir örnek hazırladık. Bir inceleyiniz. Dosya ekte.

 

[takoo]

Merhaba.
Ekli dosyayı inceleyiniz.

ya arkadaşlar bir sorun var .benim dosyaya uyarladım gönderdiklerinizi ama bilmiyorum birleştirilmiş hücreden dolayı mı hata var,dosyayı bidaha gönderiyorum,kusura bakmayın bi şeyi beceremedim

 

[Orion1]

Merhaba.
Gerekli düzeltmeler yapıldı.
Ekli dosyayı inceleyiniz.

 

[takoo]

ya arkadaşlar inanın çok yardımcı oldunuz,teşekkür ederim,hakkınızı helal edin,iyi çalışmalar