AccessTr.neT
Ayın ilk ve son gününü bulan fonksiyonlar - Baskı Önizleme

+- AccessTr.neT (https://accesstr.net)
+-- Forum: Microsoft Access (https://accesstr.net/forum-microsoft-access.html)
+--- Forum: Access Örnekleri ve Uygulamaları (https://accesstr.net/forum-access-ornekleri-ve-uygulamalari.html)
+--- Konu Başlığı: Ayın ilk ve son gününü bulan fonksiyonlar (/konu-ayin-ilk-ve-son-gununu-bulan-fonksiyonlar.html)

Sayfalar: 1 2


Ayın ilk ve son gününü bulan fonksiyonlar - Kur@l - 20/12/2012

Ayın ilk gününü bulmak meselesi önemli değil, ancak ayın son günü meselesi gerçekten diğerine göre daha sıkıntılıdır.
Bazı aylar 30 yada 31 gün iken şubat ayı bazı seneler 28 ve dört yılda bir defada 29 gün çekmektedir. Aşağıdaki fonksiyonlarla ayın ilk ve son gününü bulabilirsiniz.

Public Function songun(tarih As Date) As Date
tarih = DateAdd("M", 1, tarih)
songun = "01/" & DatePart("m", tarih) & "/" & DatePart("yyyy", tarih)
songun = (songun) - 1
Debug.Print songun
End Function

Public Function ilkgun(tarih As Date) As Date
ilkgun = "01/" & DatePart("m", tarih) & "/" & DatePart("yyyy", tarih)
Debug.Print ilkgun
End Function



Cvp: Ayın ilk ve son gününü bulan fonksiyonlar - ozguryasin - 20/12/2012

hocam paylaşım için teşekkürler +rep


Cvp: Ayın ilk ve son gününü bulan fonksiyonlar - ercansahin - 20/12/2012

Teşekkürler üstadım.


Cvp: Ayın ilk ve son gününü bulan fonksiyonlar - benremix - 20/12/2012

Hocam;
Emek ve paylaşım için teşekkürler.

saygılar...


Cvp: Ayın ilk ve son gününü bulan fonksiyonlar - C*e*l*o*y*c*e - 20/12/2012

hocam paylaşım için teşekkürler


Cvp: Ayın ilk ve son gününü bulan fonksiyonlar - ozanakkaya - 21/12/2012

Paylaşım için teşekkürler Ercan abi.