Access SQL   ›   ACCESS SORULARI VE ÖRNEK UYGULAMALARI   ›   ACCESS SORULARI   ›   [FORM] Ayın Ilk Ve Son Günlerini Yazmak

[FORM] Ayın Ilk Ve Son Günlerini Yazmak
M_Kemal_Askeri
Önemli Üye 300-400

*
Kayıt Tarihi: 17.05.2012
Toplam 134 konu açtı.
Toplam 347 yorum yaptı.
Toplam 0 puanı bulunmakta.
Mevcut Office Sürümü:
Office 2016,
Beğeniler: 3 / 0
#1
06-10-2021, 19:51
Herkese selam,

Site yönetimi uygulamamda bir altformumda Bilanço Tarihi alanında Bilançonun ait olduğu ayın ilk  ve son günlerini gösteren bir bilginin görünmesini istiyorum. Sitemizde ve internette yaptığım araştırmada DateSerial fonksiyonuna ait gördüğüm örneklerden uyguladım ancak parantez vb eksik olduğunu belirten ikaz aldım. Uyguladığım örnek aşağıdadır.

DateSerial(Year(BlncKytTrh), Month(BlncKytTrh), 1) And DateSerial(Year(BlncKytTrh), Month(BlncKytTrh)+1, 0))

Bu örnekte ben Bilanço Kayıt Tarihi alanını ölçüt olarak kullandım. Formun resmini ekledim. Konuyla ilgili arkadaşlardan destek bekliyorum. Teşekkür ederim.


Eklenti Dosyaları
.png   Bilanco2.png (Boyut: 182,49 KB / İndirilme: 49)



  Bul
  Alıntı
Bu mesajı beğenenler:
onur_can
Kıdemli Üye >1000

*
Kayıt Tarihi: 01.01.2009
Toplam 150 konu açtı.
Toplam 5.511 yorum yaptı.
Toplam 261 puanı bulunmakta.
Beğeniler: 10 / 76
#2
07-10-2021, 08:54
Formüllerinizde herhangi bir hata yok, yalnız burada And kullandığınız için hata verebilir, ayrı ayrı formülüze edip sonradan birleştirebilirsiniz.
yada form değişkeni kullandığınız için sözdizimine uygun olarak yazmanız gerekir. Örneğiniz olmadığı için inceleyemiyorum.

Visual Basic
  1. 'İlk Tarihi Bulmak İçin;
  2. Dim ilktarih
  3. ilktarih = DateSerial(Year(BlncKytTrh),Month(BlncKytTrh),1)
  4.  
  5. 'Son Tarihi Bulmak İçin;
  6. Dim sontarih
  7. sontarih = DateSerial(Year(BlncKytTrh),Month(BlncKytTrh)+ 1,0) 
  8. MetinKutusu = "Ayın İlk Tarihi:" & ilktarih & " - " & "Ayın Son Tarihi:" & sontarih



Ayrıca DateSerial fonksiyonunu daha yakından tanımak için aşağıdaki linke göz atabilirsiniz.

DateSerial Fonksiyonu Açıklaması



  Bul
  Alıntı
Bu mesajı beğenenler:
alikagan
Aktif Üye 100-150

*
Kayıt Tarihi: 27.01.2017
Toplam 31 konu açtı.
Toplam 101 yorum yaptı.
Toplam 20 puanı bulunmakta.
Mevcut Office Sürümü:
Office 2010 TR,
Beğeniler: 2 / 0
#3
07-10-2021, 10:14
Merhaba;
aşağıdaki kodu fonksiyonlara ekle


Visual Basic
  1. Public Function songun(TARIH As Date) As Date
  2. TARIH = DateAdd("M", 1, TARIH)
  3. songun = "01/" & DatePart("m", TARIH) & "/" & DatePart("yyyy", TARIH)
  4.  songun = (songun) - 1
  5.  Debug.Print songun
  6. End Function
  7. Public Function ilkgun(TARIH As Date) As Date
  8.  ilkgun = "01/" & DatePart("m", TARIH) & "/" & DatePart("yyyy", TARIH)
  9.  Debug.Print ilkgun
  10. End Function




istediğin metin kutusunun adını yazman yeterli

Visual Basic
  1. me.ilkgün = ilkgun(Date)
  2. me.songün = songun(Date)





  Bul
  Alıntı
Bu mesajı beğenenler:


Benzer Konular...
Konu: Yazar Cevaplar: Gösterim: Son Mesaj
  Ayın Kaçıncı Haftası evren89 3 395 21-05-2024, 15:16
Son Mesaj: dsezgin
  Tabloda 0'ın Altındaki Negatif Değerleri 0 Olarak Yazmak Yada Boş Bos Göstermek ofbayoglu61 4 579 15-07-2023, 13:16
Son Mesaj: ofbayoglu61
access-sql-9 [VBA] Ayın Son 10 Günü alperalper 5 493 14-03-2022, 15:49
Son Mesaj: dsezgin
  [VBA] Mesaj Kutusuna Alan Ismi Yazmak M_Kemal_Askeri 9 1.158 06-04-2021, 01:08
Son Mesaj: M_Kemal_Askeri
  [FORM] Seçilen Haftanın/ayın Ilk Ve Son Günlerini Bulma ates2014 32 2.711 04-01-2021, 22:41
Son Mesaj: ates2014
  [VBA] Tabloyu Tek Hücrede Yazmak ekremer1969 7 1.057 05-12-2020, 10:45
Son Mesaj: ekremer1969
access-sql-5 Her Ayın 15'inden 15'ine Işlem Yapma alperalper 1 684 18-02-2020, 16:03
Son Mesaj: dsezgin
  [VBA] Ayın tarihlerini gün gün sıralama deniz_tunc 22 4.457 19-11-2018, 09:19
Son Mesaj: deniz_tunc

Foruma Git:


Bu konuyu görüntüleyen kullanıcı(lar): 1 Ziyaretçi