Skip to main content

AccessTr.neT


Sorguda Tarihe Göre Metin Saydırma

Sorguda Tarihe Göre Metin Saydırma

Çözüldü #1
Kod:
nsAY: DCount("Kimlik";"TblNobet";"G1 = '" & "N" & "' AND [donem]=#" & Format([Forms]![FrmNobet]![Dtdonem];"mm/dd/yyyy") & "#")
Sorguda TblNobet tablosunda bulunan G1 deki N metinlerini formdaki tarihe göre saydırabiliyorum.
Peki tablomdaki G1-G31 aralığındaki (G1 ve G31 dahil) "N" metinlerini nasıl saydırabilirim.
Cevapla
#2
döngüyle yapabilirsiniz?
for x=1 to 31
nsAY=nsAY+ DCount("Kimlik";"TblNobet";"G" & x & " = 'N' AND [donem]=#" & Format([Forms]![FrmNobet]![Dtdonem];"mm/dd/yyyy") & "#")
next x
yada

DCount("Kimlik";"TblNobet";"(G1 = 'N' or G2='N' or G3='N'.......... )AND [donem]=#" & Format([Forms]![FrmNobet]![Dtdonem];"mm/dd/yyyy") & "#")

denemedim sadece tahmini
Cevapla
#3
Burada tarih formatlama doğru mu sizce? yani formda OCAK 2021 olan değer tabloya 01.01.2021 olarak gidiyor.
Cevapla
#4
ben aşağıdaki gibi kullandım sorun çıkmadı ama açıklamanız yetersiz bu hesaplama nerde olacak?
aşağıdaki kod bir butona basınca ekrana yazdırmakta işe yarar ama siz bu işlem nerde yapılacak sonucunu nereye yazılacak belirtmezseniz bu kod işe yaramaz.
nsAY = DCount("Kimlik", "TblNobet", "G1 = 'N' AND format([donem],'mmmm yyyy')='" & [DtDonem] & "'")
Cevapla
#5
Sayın hocam formun yüklendiği, geçerli olduğu ve formdaki dtdonem açılır kutusunun güncelleştirme sonrasında kullanacağım.
Cevapla
#6
nSay = 0
For x = 1 To 31
nSay = nSay + DCount("Kimlik", "TblNobet", "G" & x & " = 'N' AND format([donem],'mmmm yyyy')='" & [DtDonem] & "'")
Next x
bu kod işinize yarayabilir
ama nöbet formunda altbilgi kısmına ekleyeceğiniz bir metin kutusunun denetim kaynağı: "=Topla([Toplam])" da yazabilirsiniz (çift tırnak olmadan)
Cevapla

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

Yorum yapmak için üye olmanız gerekiyor

ya da