Tarih formatı değiştirme

[faruksir]

merhaba,

userforma gg.aa.yyyy olarak girdiğim tarihi excelde bi hücreye atayıp gg.aa moduna çevirmek istiyorum. Ama hücre biçimlendirmeden ne kadar uğraşsam da değiştirmiyor

aşağıdaki kodu denedim, ama bu seferde yıl kısmı kaybolduğu için sıralamada hata yapıyor ve önümüzdeki yılın tarihini bu yılmış gibi görüyor.

Private Sub TextBox3_Exit(ByVal Cancel As MSForms.ReturnBoolean)
TextBox3 = Format(TextBox3, "dd"".""mm")
End Sub


yardımcı olursanız çok sevinirim.

 

[Levent Menteşoğlu]

Bunun sebebi tarihin hücreye metin olarak atanmasından kaynaklanmaktadır. Hücreye [a1]=Clng(Cdate(Textbox3)) şeklindeki bir satırla veriyi aktarınız. Böylece değer hücreye tarihin sayısal değere çevrilmiş hali ile aktarılacaktır. Bu sayıyıda, hücreyi tarih olarak biçimlendirerek tarih görünümüne kolaylıkla çevirebilirsiniz.

 

[faruksir]

sorun çözüldü çok teşekkürler...

 

[mavidus]

arkadaşlar bende sayfa üzerine label1 ekledim ve bunuda a1 hücresine bağladım a1 hücresinde tarih yazıyor tarihin formatı ise 30 ağustos 2005 Çarşamba olarak atadım ama label1 de sadece 30.08.2005 yazıyor bunu nasıl 30 ağustos 2005 Çarşamba görüntületebiliriz.

 

[Levent Menteşoğlu]

Aşağıdaki kodu labelin bulunduğu sayfanın kod sayfasına yazın.

[vb:1:fe7ccec17b]Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address <> "$A$1" Then Exit Sub
Sheets("sayfa1").Label1.Caption = Format([a1], "dd mmmm yy dddd")
End Sub
[/vb:1:fe7ccec17b]

 

[mavidus]

çok sağol leventm