len(metinkutusu) ile kontrol etmeyi denediniz mi?
(12/03/2020, 01:23)feraz yazdı: [ -> ]Application.WorksheetFunction.EoMonth
accesste doğrudan birsonraki ayın ilk günü için 0 yazmak yeterl
dateSerial(yıl, ay+1,0) gibi
(12/03/2020, 01:24)accessman yazdı: [ -> ]Metin kutusu özelliklerinde giriş maskesi geçerlilik kuralı özellikleri var burada geçerlilik kuralına kod ile ne yazarsak bu maskeye uygun olmayanı kabul etmez ve uyarı verir
If Not deger Like "##.##.####"
Yukarıdakinine benzer kod ekleyebilirsiniz.
Demek istediğim şu
İf(metin.value<>maske)then
Msgbox Uyarı
Else
İşlem
End if
Gibi bir şey yani maske tarih oabilir veya tamamen bizim belirlediğimiz birşeyde olabilir
(12/03/2020, 01:31)berduş yazdı: [ -> ] (12/03/2020, 01:23)feraz yazdı: [ -> ]Application.WorksheetFunction.EoMonth
accesste doğrudan birsonraki ayın ilk günü için 0 yazmak yeterl
dateSerial(yıl, ay+1,0) gibi
Evet onu biliyorum.Burda amaç ayın son gününü bulmak mesela ocak 30 ise son gün şubat içinde 30.02 gibi yazarsak hata vermeli.Bu yüzden EoMonth kullanılıyor.
)))