Tarih Formatı Değişmiyor

[Eakyar]

Merhaba arkadaşlar. Ekteki dosyada bulunan tarih değerlerini hangi formata getirsem getireyim değişmiyor. 11.02.12 olarak görünen bir tarihin formatını 11 Şubat 12 olarak göstermesini istiyorum hücre biçimlendirden formatını seçtiğim halde yine aynı kalıyor. Hücreye gelip f2 enter a bastığımda format istediğim gibi oluyor. Aynı şekilde hücreyi sayı yüzde para ne yaparsam yapayım aynı kalıyor. F2 ye basıp enter a bastığımda ayarladığım format uygulanıyor. Yardımcı olabilir misiniz?

 

[sakman26]

selam,
eki inceleyiniz..
kolay gelsin...

 

[Eakyar]

Evet veriler dışarıdan farklı bir programdan çekiliyor. Çözüm için çok teşekkürler.

 

[iaydin20]

slm arkadaşalr aynı sıkıntı bendede userformdan aktarılan tarih kısmında var görsel olarak doğru ancak excelde f2 enter yapmadan sıralamada tarih olarak algılamıyor yardımlarınızı bekliyorum

cektarih= Format(cektarih, "dd.mm.yyyy")

 

[Muzaffer Ali]

cektarih değişkenini tanımlarken tarih olarak anımlayarak deneyin

Örnek:
Dim cektarih as date

kolay gelsin

 

[iaydin20]

cektarih değişkenini tanımlarken tarih olarak anımlayarak deneyin

Örnek:
Dim cektarih as date

kolay gelsin

aşağıdaki şekilde denemiştim daha önce ama sonuç değişmedi üstadım...

Dim dtDate As Date

dtDate = DateValue(cektarih.Value)

cektarih.Value = Format(dtDate, "dd.mm.yyyy")

 

[iaydin20]

bu arada eklememişim kusura bakmayın cektarih TextBox objesi

 

[Muzaffer Ali]

Şu şekilde deneyin

    Dim dtDate As Date
    dtDate = DateValue(cektarih.Value)
    Range("A1").Value = dtDate

 

[iaydin20]

maalesef şuan veri sayfasında 3000'e yakın kayıt var ve
Dim dtDate As Date
dtDate = DateValue(cektarih.Value)
Range("A1:A65000").Value = dtDate
yukardaki şekilde kullandığımda bütün satırlara textbox daki tarihi yazıyor.

 

[Korhan Ayhan]

Aşağıdaki gibi deneyiniz.

Private Sub CommandButton1_Click()
    Cells(1, 1) = CDate(TextBox1)
End Sub