Skip to main content

AccessTr.neT

Kayıt Ol

 | Facebook ile Bağlan  | Twitter İle Bağlan | Google+ İle Bağlan

Excel Vba'da Tarih Toplama

Oğuz Türkyılmaz
Oğuz Türkyılmaz
Excel Cevaplanmış Soruları
7
809

Excel Vba'da Tarih Toplama

Çözüldü #1
Oğuz Türkyılmaz
Aktif Üye
Oğuz Türkyılmaz
Bul
Aktif Üye
Adı Soyadı: Oğ.... Tü....
Yaşı: 56
Konum: Antalya
Ofis Versiyonu: Ofis 2019 64 Bit
Son Oturumu: 03/05/2023,09:23
Yorumları: 1.583
Konuları: 265
Kayıt Tarihi: 08/02/2018
Teşekkür Puanı: 0
Mesleğiniz: İşletmeci
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
atoykan
Uzman
atoykan
Bul
Uzman
Adı Soyadı:
Konum: İstanbul
Ofis Versiyonu: Ofis 2019 64 Bit
Son Oturumu: Bugün,16:13
Yorumları: 1.518
Konuları: 3
Kayıt Tarihi: 23/02/2020
Teşekkür Puanı: 217
Mesleğiniz: CIO, Yazılım
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
Oğuz Türkyılmaz
Aktif Üye
Oğuz Türkyılmaz
Bul
Aktif Üye
Adı Soyadı: Oğ.... Tü....
Yaşı: 56
Konum: Antalya
Ofis Versiyonu: Ofis 2019 64 Bit
Son Oturumu: 03/05/2023,09:23
Yorumları: 1.583
Konuları: 265
Kayıt Tarihi: 08/02/2018
Teşekkür Puanı: 0
Mesleğiniz: İşletmeci
(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
berduş
Berduş
berduş
Bul
Uzman
Adı Soyadı: ha....
Konum: -
Ofis Versiyonu: Ofis 2019 64 Bit
Son Oturumu: Bugün,14:45
Yorumları: 8.506
Konuları: 94
Kayıt Tarihi: 30/07/2014
Teşekkür Puanı: 1.051
yine format() ile formatlayacaksınız
Cevapla
#5
Oğuz Türkyılmaz
Aktif Üye
Oğuz Türkyılmaz
Bul
Aktif Üye
Adı Soyadı: Oğ.... Tü....
Yaşı: 56
Konum: Antalya
Ofis Versiyonu: Ofis 2019 64 Bit
Son Oturumu: 03/05/2023,09:23
Yorumları: 1.583
Konuları: 265
Kayıt Tarihi: 08/02/2018
Teşekkür Puanı: 0
Mesleğiniz: İşletmeci
(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
berduş
Berduş
berduş
Bul
Uzman
Adı Soyadı: ha....
Konum: -
Ofis Versiyonu: Ofis 2019 64 Bit
Son Oturumu: Bugün,14:45
Yorumları: 8.506
Konuları: 94
Kayıt Tarihi: 30/07/2014
Teşekkür Puanı: 1.051
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