iki tarihi birleştirme

[Altay3555]

Selamlar.
TxtBox1 ve TextBox2 de bulunan 2 tarihi Sayfa2de M5 hücresinde birleştirmek için kod nasıl yapılabilir.
Hafta uygulamalrı ile uygulanabilecek bir çalışma uyarlayamadım,istediğim aslında cuma gününde pzt-cuma arası tarihi yazan kod du ama bulamadım.
17.08.2009 - 21.09.2009
örneğim bu..
Şimdiden teşekkürler..

 

[leumruk]

Merhaba,

[Sayfa2!m5] = Textbox1 & " - " & Textbox2

 

[Altay3555]

Selam hocam, bu kodu nereye yazacağım.Excel sayfasına olmuyor,kod sayfasında da olmuyor.
Yeni textbox açayım ona aktarsın ,oradan da sayfaya mı aktarcağız.
Selamlar

 

[Orion1]

Selamlar.
istediğim aslında cuma gününde pzt-cuma arası tarihi yazan kod du ama bulamadım.
17.08.2009 - 21.09.2009
örneğim bu..
Şimdiden teşekkürler..

İçinde bulunduğumuz hafatın pazartesi gününü ve içinde bulunduğumuz günün tariğini aktif sayfada M5 hücresine yazar.

Sub tarih_yaz()
Dim tarih1 As Date, tarih2 As Date, gun As Byte
Dim sonuc As String
gun = Weekday(Date, 2) - 1
tarih1 = Date - gun
tarih2 = Date
sonuc = Format(tarih1, "dd.mm.yyyy") & "-" & Format(tarih2, "dd.mm.yyyy")
Range("M5").Value = sonuc
End Sub

 

[leumruk]

Selam hocam, bu kodu nereye yazacağım.Excel sayfasına olmuyor,kod sayfasında da olmuyor.
Yeni textbox açayım ona aktarsın ,oradan da sayfaya mı aktarcağız.
Selamlar

Textboxlar userform üzerinde mi sayfa üzerinde mi?

 

[Altay3555]

Hocam,
UserForm üzerinde TextBox5 de ve TextBox22 de Sayfa1 de M2 ye yazdırılacak...
İlk seferinde yanlış anlattım galiba...

 

[Altay3555]

İçinde bulunduğumuz hafatın pazartesi gününü ve içinde bulunduğumuz günün tariğini aktif sayfada M5 hücresine yazar.

Sub tarih_yaz()
Dim tarih1 As Date, tarih2 As Date, gun As Byte
Dim sonuc As String
gun = Weekday(Date, 2) - 1
tarih1 = Date - gun
tarih2 = Date
sonuc = Format(tarih1, "dd.mm.yyyy") & "-" & Format(tarih2, "dd.mm.yyyy")
Range("M5").Value = sonuc
End Sub

Hocam Selamlar,
Cevabınızı görememişim,şimdi aldım,yapıştırdım ama nasıl çalışır bilemiyorum.M5 i M2 ye çevirdim ama..
Az bilgi ile örnek kodlama yapıyorum ama bazı işlemler bana karışık geldi.Onlardan biriside yukarıdaki metin.Yardımınıza bekliyorum.

 

[leumruk]

Userform üzerindeki commandbuttonun kod bölümüne eklediğim dosyadaki kodları yazın. Değişen bir şey yok mantık aynı. Textbox numaralarını kendi textboxlarınıza göre değiştirin.

 

[Altay3555]

Selamlar Hocam,
İşlem tamam,mantığıda çözdük,birkaç yerde daha uygulamam gerek ,saat ekleyerek vs.
Teşekkür ederim.

 

[leumruk]

Selamlar Hocam,
İşlem tamam,mantığıda çözdük,birkaç yerde daha uygulamam gerek ,saat ekleyerek vs.
Teşekkür ederim.

Rica ederim.

 

[Orion1]

Hocam Selamlar,
Cevabınızı görememişim,şimdi aldım,yapıştırdım ama nasıl çalışır bilemiyorum.M5 i M2 ye çevirdim ama..
Az bilgi ile örnek kodlama yapıyorum ama bazı işlemler bana karışık geldi.Onlardan biriside yukarıdaki metin.Yardımınıza bekliyorum.

Yazdığım kodlarda neresi olmadı?
M5 hücresine içinde bulunduğumuz tarihin hafatsının ilk gününün(pazartesi) ve içinde bulunduğumuz günü veriyor.Siz ne istiyordunuz?