(27/12/2020, 01:52)berduş yazdı: Açılan_Kutu242 açılır kutusunun değiştiğinde olayına aşağıdaki kodu yazıp dener misiniz?kardeşim emeğine sağlık. aynen dediğin gibi yaptım. boş yada yanlış yazılanları düzelttim. herhangi bi hata mesajı vermedi. denemek için 25 tane falan kayıt yaptım . herhangi bişey olmadı. 2021-2 ye geçmesi mi gerekiyodu 20 yi geçince.
kodun doğru çalışabilmesi için [Klasor No] değerinin 2020-2 gibi bir formatta olması gerek eğer verilerinizde bu yapıya uygun olmayan kayıt varsa önce onları silmeli yada bu formata dönüştürmelisiniz. mesela tablonuzda [Klasor No]nun boş yada 20211 formatında olan kayıtlar var bu kayıtları silmelisiniz
Private Sub Açılan_Kutu242_Change()
Dim yMax As Long
yMax = Nz(DMax("clng(Nz(mid([Klasor No],6)))", "[Sonim Tablo]", "[Klasor No] like '" & Açılan_Kutu242 & "*'"), 1)
KlsNo = DCount("*", "[Sonim Tablo]", "[Klasor No]='" & Açılan_Kutu242 & "-" & yMax & "'")
If KlsNo = 20 Then yMax = yMax + 1
Me.Klasor_No = Açılan_Kutu242 & "-" & yMax
End Sub
Kayıt Sayma Problemi
Bu Konudaki Yorumlar |
Kayıt Sayma Problemi - Yazar: ali.ozer - 26/12/2020, 18:25
RE: Kayıt Sayma Problemi - Yazar: C*e*l*o*y*c*e - 26/12/2020, 23:15
RE: Kayıt Sayma Problemi - Yazar: ali.ozer - 27/12/2020, 00:13
RE: Kayıt Sayma Problemi - Yazar: berduş - 26/12/2020, 23:25
RE: Kayıt Sayma Problemi - Yazar: ali.ozer - 27/12/2020, 00:04
RE: Kayıt Sayma Problemi - Yazar: berduş - 27/12/2020, 00:14
RE: Kayıt Sayma Problemi - Yazar: ali.ozer - 27/12/2020, 00:20
RE: Kayıt Sayma Problemi - Yazar: berduş - 27/12/2020, 00:22
RE: Kayıt Sayma Problemi - Yazar: ali.ozer - 27/12/2020, 00:37
RE: Kayıt Sayma Problemi - Yazar: berduş - 27/12/2020, 01:52
RE: Kayıt Sayma Problemi - Yazar: ali.ozer - 27/12/2020, 13:52
RE: Kayıt Sayma Problemi - Yazar: berduş - 27/12/2020, 14:18
RE: Kayıt Sayma Problemi - Yazar: ali.ozer - 27/12/2020, 14:26
RE: Kayıt Sayma Problemi - Yazar: berduş - 27/12/2020, 14:58
RE: Kayıt Sayma Problemi - Yazar: berduş - 27/12/2020, 15:06
RE: Kayıt Sayma Problemi - Yazar: ali.ozer - 27/12/2020, 15:17
RE: Kayıt Sayma Problemi - Yazar: berduş - 27/12/2020, 15:26
RE: Kayıt Sayma Problemi - Yazar: berduş - 28/12/2020, 00:18
|
Konuyu Okuyanlar: 1 Ziyaretçi