Userform'daki takvimim günün tarihi ile açılması

[1Al2Ver]

Userform'daki takvimin günün tarihi ile açılması

Merhaba,

Userform'da mevcut olan takvim, her açıldığında günün tarihi ile açılsın istiyorum, gerekli makroyu rica ediyorum.

Teşekkür ederim.

 

[Necdet]

Merhaba,

Private Sub UserForm_Initialize()
Calendar1.Value = Date
End Sub

 

[1Al2Ver]

Merhaba,

Private Sub UserForm_Initialize()
Calendar1.Value = Date
End Sub

Sayın Necdet Yeşertener, merhaba,

Çözüm için teşekkür ederim, saygılarımla.

 

[nunikmakarios]

Günün tarihi

Benim de buna benzer bir sorunum var. user formumun kodları aşağıda ve görüntüsü de ekte. Dosyayı ilk oluşturduğum günü tarih ile açıyor. Ben de en azından açılan userformda günün tarihi hatta mümkünse bir gün öncenin tarihi olsun istiyorum ama sizin önerdiğiniz gibi çalışmadı. Yardım ederseniz sevinirim.



Private Sub CommandButton1_Click()
UserForm1.Hide
Range("B1") = DTPicker1
End Sub

Private Sub CommandButton2_Click()
UserForm1.Hide
End Sub

Private Sub UserForm()
End Sub

 

[Mehmet Şahin]

Merhaba,
şu kodu denermisiniz;

Private Sub UserForm_initialize()
DTPicker1 = Date - 1
End Sub

 

[nunikmakarios]

Teşekürler

teşekkürler çalıştı