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.

(12/03/2020, 01:33)accessman yazdı: 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

Aynen öyle abey )))