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.
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
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.
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
2. mesajdaki kodda değişiklik yaptım. Tekrar dene.
(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.