String Tarih Formatında Mı Yazılmış

1 2 3 4 5 6 7 8 9
12/03/2020, 01:26

berduş

len(metinkutusu) ile kontrol etmeyi denediniz mi?
12/03/2020, 01:31

berduş

(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:32

feraz

(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.
12/03/2020, 01:33

accessman

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:34

feraz

(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:34

feraz

(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 )))
1 2 3 4 5 6 7 8 9