TextBox nesneleri ile tarih ile sayı toplama

mozdem

Altın Üye
Katılım
11 Kasım 2005
Mesajlar
446
Excel Vers. ve Dili
Windows 2011 TR
MS Office 2021 TR - 64bit

VBA, Selenium ve VBS
Altın Üyelik Bitiş Tarihi
08-04-2026
Ekte dosyası mevcut .
TextBox3 (Tarih Formatı) = TextBox1 (Tarih Formatı) + TextBox2 (Sayı)
Nasıl Toplanır?
Teşekkürler
__________________________________
Private Sub Calendar1_DblClick()
TextBox1.Text = Calendar1.Value
Calendar1.Visible = False
End Sub

Private Sub TextBox1_MouseUp(ByVal Button As Integer, ByVal Shift As Integer, ByVal X As Single, ByVal Y As Single)
Calendar1.Visible = True
End Sub

Private Sub UserForm_Activate()
Calendar1.Visible = False
End Sub
 

Ekli dosyalar

Katılım
7 Mart 2005
Mesajlar
31
Merhaba,

Aşağıdaki kodu deneyin.
Kod:
TextBox3 = Format(DateAdd("d", TextBox2, TextBox1), "dd.mm.yyyy")
 

mozdem

Altın Üye
Katılım
11 Kasım 2005
Mesajlar
446
Excel Vers. ve Dili
Windows 2011 TR
MS Office 2021 TR - 64bit

VBA, Selenium ve VBS
Altın Üyelik Bitiş Tarihi
08-04-2026
Katılım
7 Mart 2005
Mesajlar
31
Merhaba,

"d" değeri day anlamındadır. Yani eklemek istediğiniz değerin gün olduğunu belirtir. Bu şekilde "m" yazarak ay, "w" yazarak hafta , ..... ekleyebilirsiniz. Aslında nasıl kullanıldığı detaylı bir şekilde örnekleriyle yardım dosyasında var. Ben de ordan bakmıştım. :)
 

mozdem

Altın Üye
Katılım
11 Kasım 2005
Mesajlar
446
Excel Vers. ve Dili
Windows 2011 TR
MS Office 2021 TR - 64bit

VBA, Selenium ve VBS
Altın Üyelik Bitiş Tarihi
08-04-2026
Teşekkürler

Merhaba,

"d" değeri day anlamındadır. Yani eklemek istediğiniz değerin gün olduğunu belirtir. Bu şekilde "m" yazarak ay, "w" yazarak hafta , ..... ekleyebilirsiniz. Aslında nasıl kullanıldığı detaylı bir şekilde örnekleriyle yardım dosyasında var. Ben de ordan bakmıştım. :)
Çok teşekkür ederim.
 
Üst