tarih formatı ile işlem problemi

[egebes]

Bir web sitesinden copy-paste ile excele bilgi alıyorum.Ayni yerden bilgiyi almama ragmen kopyalamadan sonra excelde tarih degerinin oldugu kolonda bir grup gg.aa.yyyy formatında saga dayali digerleri ise yyyy.aa.gg formatında sola dayali gorunuyor.Hucre formatina baktigimda gg.aa.yyyy seklinde olanlar Date yyyy.aa.gg seklinde olanlar ise General olarak gozukuyor.Zaman degerini oldugu bir kolonda var burada da bir kısmı saga bir kısmı sola dayalı farmatta birinde Time digerinde General.

Benim esas sorunum bu degil,ben bu tarih degerleri ile ilgili islem yapmak istiyorum.Tarih ile zaman bilgisini birleştirip,tarih ve zaman olarak bulundugumuz andan 7 gun geriye dogru kayitlari secmek istiyorum.
Bunun icin tarih ve zaman kolonlarını ayrı bir kolonda & operatoru ile birleştirmeye çalışıyorum.Formatı General olanlarda problem çıkmıyor 2 değer yanyana yeni kolona çıkıyor.Ancak Formatı Date ve Time olanlarda birleştirme sonunda tarih yerinde 39xxx seklinde bir rakam zaman kısmında da 0,xxxxxxxx şeklinde bir rakam çıkıyor.

Formatı Date olanlar için yil ay ve gunu ayri kolonlara aldim sonra bu 3 degeri & operatoru ile birlestirdim.O zaman hucre icinde istedigim sekilde goruntulendi.
Ancak bu seferde islem yapmak istedigmde islem yine 39xxx seklinde sayi uzerinden yapildi.

yardimlarinizi bekliyorum.

 

[Necdet]

Merhaba,

Örnek dosya eklerseniz çözüme daha çabuk ulaşırsınız.

 

[Orion1]

Merhaba,

Örnek dosya eklerseniz çözüme daha çabuk ulaşırsınız.

Hocamla Ayni kanaattayım.

 

[egebes]

ilginize tesekkurler,
dosya ektedir

 

[Orion1]

Metin olarak algılıyor.
Dosyanız ekte butona basınız.

Sub düzenle()
    Range("K4").Value = 1
    Range("K4").Select
    Selection.Copy
    Range("B4:B" & Cells(65536, "B").End(xlUp).Row).Select
    Selection.PasteSpecial Paste:=xlPasteAll, Operation:=xlMultiply, _
        SkipBlanks:=False, Transpose:=False
    Application.CutCopyMode = False
    Selection.NumberFormat = "dd/mm/yyyy"
    Range("A1").Select
End Sub

 

[egebes]

Sayın Evren,
Yardımlarınız için çok teşekkürler.
Yazdığınız kod ile kolondaki tüm hücrelerin formatı Date yapılıyor.
Ama benim birleştirme yaptığım H kolonunda yine tarih yerinde 39xxx li bir sayı geliyor.Dolayısıyla yine tarih üzerinden bir işlem yapamıyorum.