Skip to main content

AccessTr.neT


Tarih Kriterine Göre En Yüksek Değer

Tarih Kriterine Göre En Yüksek Değer

#5
İnceleyip olumlu olumsuz bildirimde bulununuz.

Private Sub itarih_Change()

'ATOZ112
'AŞAĞIDAKİ KODLAR DAHİL EDİLMİŞTİR.


Me.Komut15.SetFocus

If Nz(DLookup("cirosu", "Tablo1", "tarih=#" & Format(Me.itarih, "mm\/dd\/yyyy") & "# And d_kat='KAT -1'"), 0) <> 0 Then

Me.Metin11 = DMax("cirosu", "Tablo1", "tarih=#" & Format(Me.itarih, "mm\/dd\/yyyy") & "# And d_kat='KAT -1'")
Me.Metin13 = DMin("cirosu", "Tablo1", "tarih=#" & Format(Me.itarih, "mm\/dd\/yyyy") & "# And d_kat='KAT -1'")

Else

MsgBox ("Bu Aya Ait Veri Yoktur")

End If

End Sub
.rar YuksekDusukCiro-sld.rar (Dosya Boyutu: 16,05 KB | İndirme Sayısı: 7)
Cevapla

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

Yorum yapmak için üye olmanız gerekiyor

ya da

Bu Konudaki Yorumlar
Tarih Kriterine Göre En Yüksek Değer - Yazar: ALTANs - 22/04/2017, 15:53
Cvp: Tarih Kriterine Göre En Yüksek Değer - Yazar: ozanakkaya - 22/04/2017, 22:58