Tarih Formatı Hakkında

[seddur]

Merhaba.Aşağıdaki kod ile Tablo sayfası B11 arası hücrelere artan şekilde günlük tarihleri yazdırıyorum.Ancak Tarihleri 01.01.2023 formatında yazdırıyor.Benim istediğim 01.01.23 şeklinde yazdırmak.Yardımcı olabilirseniz sevinirim.

Private Sub TextBox2_Change()
Sheets("Tablo").Range("B1") = DateSerial(TextBox1.Value, Split(TextBox2.Value, " ")(0), 1)
Sheets("Tablo").Range("B11").DataSeries Date:=xlDay
End sub

 

[dEdE]

Merhaba,
Aşağıdaki kodu dener misiniz?

Private Sub TextBox2_Change()
    Sheets("Tablo").Range("B1") = DateSerial(TextBox1.Value, Split(TextBox2.Value, " ")(0), 1)
    Sheets("Tablo").Range("B1:p1").DataSeries Date:=xlDay
    Range("B1:P1").NumberFormat = "dd/mm/yy"
End Sub

 

[BrknYgz]

tarihlerin bulunduğu sütunu seçip, hücre biçimlendir kısmından; "özel" bölümünde tarih için DD/MM/YY şeklinde biçimlendirirseniz de olabilir gibi. Makro içerisinde yapmanız zorunlu değil diye düşündüm bi an. Alternatif olarak deneyebilirsiniz. Az önce denedim, Office 365 versiyonunu kullanıyorum. Sizin talebiniz şeklinde görüntüleyebildim.

 

[seddur]

Dediğinizi yaptım ama sayfa değiştirdiğimde ayarlar bozulup eski haline dönüyor.
Sn.dEdE kodlarınız oldu,çalışıyor.Teşekkür ederim.