AccessTr.neT
Formda toplama işlemi - Baskı Önizleme

+- AccessTr.neT (https://accesstr.net)
+-- Forum: Microsoft Access (https://accesstr.net/forum-microsoft-access.html)
+--- Forum: Access Cevaplanmış Soruları (https://accesstr.net/forum-access-cevaplanmis-sorulari.html)
+--- Konu Başlığı: Formda toplama işlemi (/konu-formda-toplama-islemi--13846.html)

Sayfalar: 1 2 3


Cvp: Formda toplama işlemi - Yandemir - 21/02/2012

birbiri ile bağlı formlar olmadığı için sorun çıkartmadan çalışır.


Cvp: Formda toplama işlemi - mf.murat - 21/02/2012

Malesef 4 ncü mesajımda eklediğim formda formulleri çalıştıramıyorum.


Cvp: Formda toplama işlemi - Yandemir - 21/02/2012

düzelttim yalnız netbook kullandığım için ekran dizaynınızı biraz bozdum (10 inch) siz düzeltirsiniz.
Ek Dosyalar
 vt10a.rar(43.75 KB)



Cvp: Formda toplama işlemi - mf.murat - 21/02/2012

Murat Hocam Çok teşekkür ederim uygulama için ancak filtreleme yaptığım zaman OK NOK ve DEVAM değerleri değişmiyor.

Tablo üzerindeki değerleri sayıyor.
Ben ise filtreleme yapılan verileri (filtre sonucunu) saysın istiyorum


Cvp: Formda toplama işlemi - Yandemir - 22/02/2012

bu yapıda zor ama imkansız değil. biraz uğraşı ve bol bol kod istiyor.


Cvp: Formda toplama işlemi - Yandemir - 22/02/2012

alttaki toplamları pembe alanları kabul edecek şekilde formunuzu dizayn ederseniz kodlarla hallediliyor sorununuz ancak.

aşağıdaki kodlar ve benzerleri çeşitli yerlerde kullanılmıştır.

    Me.Metin38 = DCount("DefectStatus", "Tbl_Data_Log", Me.Alt121.Form.Filter & " and DefectStatus='OK'")
Me.Metin41 = DCount("DefectStatus", "Tbl_Data_Log", Me.Alt121.Form.Filter & " and DefectStatus='NOK'")
Me.Metin43 = DCount("DefectStatus", "Tbl_Data_Log", Me.Alt121.Form.Filter & " and DefectStatus='DEVAM'")
Me.Metin45 = (Me.Metin38 / 100) * DCount("DefectStatus", "Tbl_Data_Log", Me.Alt121.Form.Filter)
Ek Dosyalar
 vt10a.rar(47.98 KB)