Skip to main content

AccessTr.neT


Excel Vba'da Tarih Toplama

Oğuz Türkyılmaz
Oğuz Türkyılmaz
7
248

Excel Vba'da Tarih Toplama

Çözüldü #1
Konu açıklaması biraz kısır oldu ama yapmak istediğimi şöyle açıklayayım. Bir formun üzerinde 2 textbox'ım var. Normalde Excel hücresinde =Bugün + 10 formülünü yazdığınızda o hücreye o günden itibaren 10 gün sonrasının tarihini atıyor. Ben bu işlemi aşağıdaki koda nasıl uyarlayabilirim. Textbox_Tarih değerine 10 ekleyip çıkan tarihi TextBox_Geçerlilik tarihine atamak istiyorum. Yardımlarınız için teşekkür ederim.

TextBox_TeklifGecerlilikTarihi.Value = TextBox_Tarih.Value + 10
Access Çekirgesi 
[Resim: img-cray.gif]


Cevapla
#2
Merhaba Oğuz Bey
DateAdd ile yapabilirsiniz.
TextBox_TeklifGEcerlilikTArihi = Dateadd("d", 10, TextBox_Tarih.value)
"d" gün için, "m" ay için, "yyyy" yıl için kullanılır
Cevapla
#3
(27/09/2021 23:27)atoykan Adlı Kullanıcıdan Alıntı: Merhaba Oğuz Bey
DateAdd ile yapabilirsiniz.
TextBox_TeklifGEcerlilikTArihi = Dateadd("d", 10, TextBox_Tarih.value)
"d" gün için, "m" ay için, "yyyy" yıl için kullanılır

@atoykan hocam cevabınız için teşekkür ederim. Kodunuz doğru çalışıyor fakat sonucu İngiliz sistemine göre gösteriyor. Bugünün tarihinden itibaren hesapladığında Textbox'da 08.10.2021 şeklinde göstereceği yerde 10.08.2021 şeklinde gösteriyor. Formatlama kodum da aşağıda. Formatı nasıl değiştirmem lazım.
Kod
TextBox_Tarih.Value = Format(Date, "dd.mm.yyyy")
TextBox_TeklifGecerlilikTarihi.Value = Format(Date, "dd.mm.yyyy")
TextBox_TeklifGecerlilikTarihi = DateAdd("d", 10, TextBox_Tarih.Value)
Access Çekirgesi 
[Resim: img-cray.gif]


Cevapla
#4
yine format() ile formatlayacaksınız
Cevapla
#5
(28/09/2021 13:41)berduş Adlı Kullanıcıdan Alıntı: yine format() ile formatlayacaksınız
@berduş formatı tekrar formatlayarak doğru sonuca ulaştım ama bunun başka bir yöntemi yok mu yada doğru sonuç almama rağmen işin doğrusu farklı bir kod mu ?
Kod
TextBox_TeklifGecerlilikTarihi.Value = Format(DateAdd("d", 10, TextBox_Tarih.Value), "dd.mm.yyyy")
Access Çekirgesi 
[Resim: img-cray.gif]


Son Düzenleme: 28/09/2021, 16:59, Düzenleyen: Oğuz Türkyılmaz.
Cevapla
#6
En basinda
Format(Date+10, "dd.mm.yyyy") kullanmayı denediniz mi
Cevapla

Bir hesap oluşturun veya yorum yapmak için giriş yapın

Yorum yapmak için üye olmanız gerekiyor

ya da
Task