Skip to main content

AccessTr.neT


Excel Vba'da Tarih Toplama

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

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 yazdı: 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ş yazdı: 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