Textboxlara Default Tarih Atamak.

(22/06/2022, 11:20)userx yazdı: Ben Office 2019 kullanıyorum. Bu kod hafta Pazartesi'den Pazar'a olan tarihi gösteriyor. Eğer sizde hafta sonunu göstermiyorsa

TextBox2.Value = Format(Now() + Weekday(Now(), 3)+2, "dd.mm.yyyy")

olarak dener misiniz?

@userx hocam ben 365 e terfi ettim etmez olaydım. İlk fırsatta deneyip bilgi vereceğim teşekkür ederim.

@user hocama alternatif olarak aşağıdaki kodlar da kullanılabilir
Ufak bir bilgi
cdate(1)=31 aralık 1899 pazar (pazar 1. gündür, türkiyede ise pazartesi dolayısıyla weekday(Trh,2) yazılır)
x=Tarih mod 7
x ==>
0 : Cumartesi
1 : Pazar
2 : pazartesi
3 : salı
4 : çarşamba
5 : perşembe
6 : cuma
hafta başı - pazartesi

date-(date mod 7 -2)

hafta sonu - pazar

date +(8-(date mod 7) )