Sayın üstadlar ve arkadaşlar,
Access çok ilgi alanıma girmiyor aslında arkadaşlar ama hayır diyemeyeceğim bir arkadaşımın benden bir isteği var. Forumda çok araştırdım ama uyarı verme olayının makrosuz veya form kullanmadan yapılmış halini hiç görmedim.
Bana bir yol gösterseniz de yeter. Çok yüzsüz bir istek oldu ama kusura bakmayın
Tek istediğim dosya her açıldığında "cikisTarihi" adlı sütundaki tarihleri kontrol edip 30 gün kalanları uyarı versin.
Dediğim gibi kod değil yol göstermenizi isterim sadece. Form ve makrolar mümkün olduğunca kullanılmadan tabi. Excel'deki formül yazmak gibi bir yol var mıdır?
Şimdiden teşekkür eder, Kolaylıklar dilerim
Tabloda tarih için uyarı verme(makrosuz)
Ekteki uygulamaya Form1 adında form ekleyip forma liste kutusu ekledim. Formda ayrıca liste kutusundaki satırları sayan metin kutusu var.
liste kutusunun satır kaynağındaki sorgunun çıkış tarihi sütununun ölçütüne
form1'in açıldığnda olayına da
kodunu ekledim.
Form1 açıldığında çıkış tarihi 30 günden az kalan var ise form1 uyarı olarak açık kalıyor, yok ise kapanıp Tablo1 isimli form açılıyor.
liste kutusunun satır kaynağındaki sorgunun çıkış tarihi sütununun ölçütüne
>Date()-30
ölçütünü ekledim. form1'in açıldığnda olayına da
Me.Metin2 = Me.Liste0.ListCount
If Me.Metin2 = "0" Then
DoCmd.Close acForm, "Form1"
DoCmd.OpenForm "Tablo1", acNormal, "", "", , acNormal
End If
kodunu ekledim.
Form1 açıldığında çıkış tarihi 30 günden az kalan var ise form1 uyarı olarak açık kalıyor, yok ise kapanıp Tablo1 isimli form açılıyor.
Sayın Ozan Bey,
Çok çok teşekkür ettim. Benim için çok büyük zahmetlere girmişsiniz. Çok sağolun. Umarım bu vesileyle Access e bir başlangıç yaparım.
Siteniz hakkında söylenecek söz bulamıyorum zaten. Çok iyi sağlam bir şekilde çalışan bir site. Çalışmalarınızın başarı ile devamını dilerim.
Çok çok teşekkür ettim. Benim için çok büyük zahmetlere girmişsiniz. Çok sağolun. Umarım bu vesileyle Access e bir başlangıç yaparım.
Siteniz hakkında söylenecek söz bulamıyorum zaten. Çok iyi sağlam bir şekilde çalışan bir site. Çalışmalarınızın başarı ile devamını dilerim.
Konuyu Okuyanlar: 2 Ziyaretçi