kodun çalışmama sebebi arada farklı bir yerde kullanmış olduğunuz exit sub fonksiyonu
kodu exit sub'ın hemen üstüne de ekleyerek dener misiniz?
yani 2 yere de ekleyerek...
Yeniden Sıra Numarası Verme
(08/02/2021, 13:59)berduş yazdı: kodun çalışmama sebebi arada farklı bir yerde kullanmış olduğunuz exit sub fonksiyonuHangi Kod?
kodu exit sub'ın hemen üstüne de ekleyerek dener misiniz?
yani 2 yere de ekleyerek...
Yukarıda benim sorduğum kod düzenimi?
Son Düzenleme: 08/02/2021, 15:27, Düzenleyen: fenerli6774.
(Sebep: Düzeltme)
CurrentDb.Execute "UPDATE tblMallar SET tblMallar.Malno = DCount(""*"",""[tblMallar]"",""[Ihaleno]='" & Me.akNo & "' and [MalID]<= "" & [tblMallar]![MalID]);"
kodunu
Çok teşekkür ederim. Şimdi oldu. Emeğinize sağlık.
rica ederim
iyi çalışmalar)
iyi çalışmalar)
CurrentDb.Execute "UPDATE tblMallar SET tblMallar.Malno = DCount(""*"",""[tblMallar]"",""[Ihaleno]='" & Me.akNo & "' and [MalID]<= "" & [tblMallar]![MalID]);"
komutunda anladığım kadarıyla
""[Ihaleno]='" & Me.akNo & "' ifadesi
ihale no alanı Sayfamdaki akNO hücresine eşit ise şartını belirtiyor.
2020 yılı 1. ihale için sıralamayı yapıyor.
Ama 2021 yılı 1. ihale de eklendiğinde
2020 ve 2021 yılının 1. ihalelerindeki malları görüyor.
Sadece ilgili yılın mallarını görmesi için
İfadeyi doğru anladıysam
""[Ihaleno]='" & Me.akNo & "' ifadesi kopylayıp yapıştırdım ve yıl olarak değiştirdim.
CurrentDb.Execute "UPDATE tblMallar SET tblMallar.Malno = DCount(""*"",""[tblMallar]"",""[Yil]='" & Me.txtYil & "' and ""[Ihaleno]='" & Me.akNo & "' and [MalID]<= "" & [tblMallar]![MalID]);"
şeklinde yaptım.
Söz disim hatası; eksik işleç uyarısı verdi.
komutunda anladığım kadarıyla
""[Ihaleno]='" & Me.akNo & "' ifadesi
ihale no alanı Sayfamdaki akNO hücresine eşit ise şartını belirtiyor.
2020 yılı 1. ihale için sıralamayı yapıyor.
Ama 2021 yılı 1. ihale de eklendiğinde
2020 ve 2021 yılının 1. ihalelerindeki malları görüyor.
Sadece ilgili yılın mallarını görmesi için
İfadeyi doğru anladıysam
""[Ihaleno]='" & Me.akNo & "' ifadesi kopylayıp yapıştırdım ve yıl olarak değiştirdim.
CurrentDb.Execute "UPDATE tblMallar SET tblMallar.Malno = DCount(""*"",""[tblMallar]"",""[Yil]='" & Me.txtYil & "' and ""[Ihaleno]='" & Me.akNo & "' and [MalID]<= "" & [tblMallar]![MalID]);"
şeklinde yaptım.
Söz disim hatası; eksik işleç uyarısı verdi.
Konuyu Okuyanlar: 1 Ziyaretçi