Bu ay ? Bu yıl ? ( 2 tarih arası )
Tarih
30/01/2011 09:40
Konu Sahibi
okileturc
Yorumlar
5
Okunma
2635
Konuyu Oyla:
  • Derecelendirme: 0/5 - 0 oy
  • 5
  • 4
  • 3
  • 2
  • 1

Derecelendirme: 0/5 - 0 oy



okileturc
Aktif Üye
Kullanici Avatari
Aktif Üye
O.... V....
966
18/03/2009
459
İzmir
Ofis 2003
23/05/2016,13:38
İçinde bulunduğunuz gün itibariyle ( Date () )
Bu ayın ik günü ve son gününe veya Bu yılın
ilk ve son gününe hiç ihtiyaç duydunuz mu ?

Ben resimde göreceğiniz combobox yardımı ile
ilk tarih ve son tarih atama uygulamasında buna
ihtiyaç hissettim

resim

Google ın da yardımı ile aşağıdaki kodlara ulaştım

İçinde bulunduğumuz ayın ilk gün tarihi (01.01.2011 için)

Visual Basic Code
ilktarih=CDate("01/" & Month(Now) & "/" & Year(Now))



İçinde bulunduğumuz ayın son günü tarihi (31.01.2011 için)

Visual Basic Code
sontarih=DateAdd("d", -1, CDate("01/" & Month(Now) + 1 & "/" & Year(Now)))



İçinde bulunduğumuz yılın ilk günü tarihi (01.01.2011 için)

Visual Basic Code
ilktarih=CDate("01/01/" & Year(Now))



İçinde bulunduğumuz yılın son günü tarihi (31.12.2011 için)

Visual Basic Code
sontarih=DateAdd("d", -1, CDate("01/01/" & Year(Now) + 1))


Sistem tarihinizi farklı günlere alıp kodları deneyebilirsiniz, çalışıyorlar Img-grin
Özellikle son tarihleri bulmak için kullanılan "sonraki aya gidip 1 çıkarmak
veya sonraki yıla gidip 1 çıkarmak" metodunu çok eğlenceli buldum.

Kolay gelsin




Ek Dosyalar
.rar   buay_buyıl.rar (Dosya Boyutu: 37,29 KB / İndirme Sayısı: 113)
okileturc, 18-03-2009 tarihinden beri AccessTr.neT üyesidir.
Cevapla

benremix
Uzman
Kullanici Avatari
Uzman
R.... S....
4.432
17/05/2009
365
Ankara
Ofis 2010
21/02/2017,06:29
Sponsor Reklam
Sn Okileturc araştırma ve paylaşımınız için tebrik ve teşekkürlerimi sunuyorum
Saygılar...
Bilgi paylaşıldıkça çoğalır....
Her engel, yaşam koşullarınızı daha iyileştirecek bir fırsattır.


Access için her zaman lazım olacak konu başlıkları listesi


Cevapla

maytas
Aktif Üye
Kullanici Avatari
Aktif Üye
545
21/12/2008
173
Bursa
Ofis 2010 32 Bit
27/09/2015,02:03
Paylaşım için teşekkürler Oktay hoca.

Alternatif olarak burada DateSerial fonksiyonu da kullanılabilir.

Mevcut ayın ilk günü:

Visual Basic Code
MsgBox DateSerial(Year(Date), Month(Now), 1)

Mevcut ayın son günü:

Visual Basic Code
MsgBox DateSerial(Year(Date), Month(Now) + 1, 0)

Mevcut yılın ilk günü:

Visual Basic Code
MsgBox DateSerial(Year(Date), 1, 1)

Mevcut yılın son günü:

Visual Basic Code
MsgBox DateSerial(Year(Date) + 1, 1, 0)


Mesajlarımızı Türkçe yazım kurallarına uygun yazalım.
Emeğe saygı gösterelim, bir teşekkürü çok görmeyelim.
resim
Cevapla

okileturc
Aktif Üye
Kullanici Avatari
Aktif Üye
O.... V....
966
18/03/2009
459
İzmir
Ofis 2003
23/05/2016,13:38
Sponsor Reklam
Hemen bakacağım , çok tşk.
okileturc, 18-03-2009 tarihinden beri AccessTr.neT üyesidir.
Cevapla

okileturc
Aktif Üye
Kullanici Avatari
Aktif Üye
O.... V....
966
18/03/2009
459
İzmir
Ofis 2003
23/05/2016,13:38
Çok güzel çalışıyor. Kesinlikle çok daha temiz
bir kod olduğu için sizin önerinizi kullanacağım.
Örneği DateSerial kodlarla ekliyorum. Tekrar tşk.




Ek Dosyalar
.rar   buay_buyıl_maytas.rar (Dosya Boyutu: 39,48 KB / İndirme Sayısı: 53)
okileturc, 18-03-2009 tarihinden beri AccessTr.neT üyesidir.
Cevapla

assenucler

Kullanici Avatari
Onursal
A.... S.... Ş....
2.053
31/10/2008
63
İstanbul
-
22/02/2017,20:41
Sponsor Reklam
Bu güzel paylaşım ve katkınız için teşekkürler..
Cevapla


Konuyu Okuyanlar: 1 Ziyaretçi


Konu ile Alakalı Benzer Konular
Konular Yazar Yorumlar Okunma Tarih Son Yorum
  İki Tarih Arası Gün Ay Yıl Hesaplama ozanakkaya 29 40.913 29/08/2015, 02:47 ozanakkaya
  menü ile veri tabanları arası gezinti2 hgsoftware 7 2.129 12/03/2013, 10:34 hgsoftware
  Tarih boşsa tablodaki en büyük değeri getirsin accessman 2 1.494 17/04/2012, 14:59 DUAYEN
  Seçmeli Kutular Arası Şifre Uygulaması HandSword 4 2.319 08/07/2011, 15:56 sadikkavakli
  Tarih Seçme Kutusu(Saatli) Coskun0559 5 3.361 22/12/2010, 12:22 Coskun0559


Türkçe Çeviri: MCTR, Yazılım: MyBB, © 2002-2017 MyBB Group.
DMCA.com Protection Status
© Desing by XSTYLED| Develops by ozanakkaya