Skip to main content

AccessTr.neT


Form Üzerindeki Alanların Sırayla Dolması Hk.

Form Üzerindeki Alanların Sırayla Dolması Hk.

Çözüldü #1
Merhaba,

Evet arkadaşlar ben, şirketime ekte sunmuş olduğum avans talep formunu hazırladım fakat, bu formdaki alanlar isimden başlayıp sonuna kadar doldurulmasını istiyorum. Bir önceki alan dolmadan diğerine geçilmesin. Alanların hepsi doldurulduğunda gönder seçeneği ile raporu outlooka Excel yada pdf olarak nasıl gönderebilirim ? Yardımlarınızı bekliyorum. Teşekkür ederim.
.rar avans.rar (Dosya Boyutu: 21,87 KB | İndirme Sayısı: 14)
Cevapla
Çözüldü #2
Görevi alanının girildiğinde olayına

Private Sub Görevi_Enter()
If IsNull(Me.AdiSoyadi) Then
MsgBox ("Adı Soyadı Alanı Boş Bırakılamaz.")
DoCmd.GoToControl "AdiSoyadi"
End If
End Sub
şeklinde kod yaz.
diğer alanlar için girildiğinde olayına benzeri kodun yazılması gerekli, mantık aynı.

Excele göndermek için
Accessten excel'e seçmeli veri gönderme
Pdf'ye göndermek için
Access Raporları Pdf Olarak Görüntüleme
linklerini incele

Cevapla
Çözüldü #3
Yardımlarınızdan dolayı çok teşekkür ederim. Bir aydır çok uğraştım bunun için. İyi çalışmalar. Saygılar.
Son Düzenleme: 14/12/2010, 12:45, Düzenleyen: murguc.
Cevapla
Çözüldü #4
Tekrar Merhabalar,

Üstadım sizin vermiş olduğunuz kodları uyguladım, fakat istenen yerleri doldurduğumuz zamanda bir sonraki satıra geçiş yapmıyor. Uygulamayı ekleyemedim. Site izin vermiyor. Benim Access bilgim sadece 1 aylık sizin kadar tecrübeli değilim acaba ben mi yanlış yaptım. Bir daha bakabilirseniz sevinirim. Teşekkürler
Cevapla
Çözüldü #5
2. mesajdaki kodda değişiklik yaptım. Tekrar dene.
Cevapla
Çözüldü #6
(14/12/2010, 16:19)murguc yazdı: Tekrar Merhabalar,

Üstadım sizin vermiş olduğunuz kodları uyguladım, fakat istenen yerleri doldurduğumuz zamanda bir sonraki satıra geçiş yapmıyor. Uygulamayı ekleyemedim. Site izin vermiyor. Benim Access bilgim sadece 1 aylık sizin kadar tecrübeli değilim acaba ben mi yanlış yaptım. Bir daha bakabilirseniz sevinirim. Teşekkürler

Dostum Syn sledgeab un verdiği kodları uygulamanızdaki 2 alana ekledim ve gayet sağlıklı çalışıyor.


Private Sub Departmani_Enter()
If IsNull(Me.Görevi) Then
MsgBox ("Görevi Alanı Boş Bırakılamaz.")
DoCmd.GoToControl "görevi"
End If
End Sub

Private Sub Form_Open(Cancel As Integer)
www_access (forumlari_com)
End Sub
Private Sub Görevi_Enter()
If IsNull(Me.AdiSoyadi) Then
MsgBox ("Adı Soyadı Alanı Boş Bırakılamaz.")
DoCmd.GoToControl "AdiSoyadi"
End If
End Sub
kodlarınızı bu matığa göre diğerlerinede uygularsanız sorun çıkmadan çalışacaktır iyi çalışmalar dilerim.
erdem55, 12-03-2009 tarihinden beri AccessTr.neT üyesidir.
Cevapla

Bir hesap oluşturun veya yorum yapmak için giriş yapın

Yorum yapmak için üye olmanız gerekiyor

ya da
Task