Tarih formatını makroyla değiştirme

[assenucler]

Dostlar merhabalar;


Bir gsm şirketinden gelen 5 - 6000 kayıttan oluşan telefon listesini, excel'e kaydettiğimde, tarih formatı birden fazla hücrede ve aşağıdaki gibidir.

2015-08-09 20:04:10

Olmasını istediğim tarih formatı ise 09.08.2015 şeklinde ve "Z" sütunundaki satırda yer almalı. Makroyla nasıl yapılabilir?

Ben kısa bir kayıt içeren dosyayı yolluyorum. Yardımınızı rica ediyorum.

Önceden teşekkür ederim.

 

[YUSUF44]

Z16 için aşağıdaki formülü kullanın ve sütun biçimini istediğiniz tarih biçimine göre ayarlayın:

=C16*1

 

[assenucler]

Kısa süredeki yanıtınız için teşekkürler.

Önerdiğiniz çözümle, tarih formatı 09.08.2015 dönüşürken saat, dakika ve saniye kısmı da çıkıyor. Saat, dakika ve saniye'yi nasıl kaldırabilirim?

 

[YUSUF44]

O hücrelerin biçimini istediğiniz gibi ayarlayabilirsiniz.

 

[YUSUF44]

Eğer benim saatlerle hiç işim yok, tarihi alsın yeter diyorsanız aşağıdaki formülü kullanabilirsiniz:

=TARİH(YIL(C16*1);AY(C16*1);GÜN(C16*1))

 

[assenucler]

Bilgilendirmeniz için teşekkürler.


Ekli resimde de görüleceği gibi, ne yaparsam yapayım, tarih formatındaki saat, dakika ve saniye hep listeleniyor.

 

[halilyor]

Columns("Z:Z").Select
Selection.NumberFormat = "dd/mm/yyyy;@"

 

[YUSUF44]

İyi de ben size Z sütununa uygulanmak üzere formül verdim ama siz orada formül kullanmamışsınız, değer aynı duruyor.

 

[halilyor]

TextBox ile kayıt yapıyorsanız.

Format(TextBox1, "dd.mm.yyyy")

 

[Orion1]

TextBox ile kayıt yapıyorsanız.

Format(TextBox1, "dd.mm.yyyy")

Bunu yapmayın.
Hücreye veriyi tarih görünümünde metin olarak atar.
Onun yerine

range("A1").numberformat="dd.mm.yyyy"

 

[assenucler]

Sayın YUSUF44,

5. iletideki çözümünüz öncesine göre çektiğim resmi eklediğim için yanlış bir anlaşılma oldu.
İlginiz için teşekkür ederim.

 

[assenucler]

Bunu yapmayın.
Hücreye veriyi tarih görünümünde metin olarak atar.
Onun yerine

range("A1").numberformat="dd.mm.yyyy"

Değerli Üstadım,

İlginiz için teşekkür ederim.

5-6 bin kayıt için bir defada yapabilmek için, kodu nasıl oluşturmak gerekiyor?

Sevgi ve saygılar.

 

[assenucler]

Columns("Z:Z").Select
Selection.NumberFormat = "dd/mm/yyyy;@"

Sayın Halilyor,


İlginiz için teşekkürler. 6000 kayıt için kodunuz nasıl olmalıdır?

Sevgi ve saygılar.

 

[Orion1]

Sayın Yusuf44'ün 5nci mesajdaki formülünü yazın ve sonrada o hücreleri biçimlendirin.

 

[assenucler]

Teşekkürler.

 

[halilyor]

Sayın Halilyor,


İlginiz için teşekkürler. 6000 kayıt için kodunuz nasıl olmalıdır?

Sevgi ve saygılar.

Sayın assenucler dosya indiremediğim için problemizi tam olarak bilemiyorum.

 

[YUSUF44]

Ekteki dosyayı inceleyiniz:

https://drive.google.com/file/d/0B43WMUs21VpfMEdnTExHb0JVSkE/view?usp=sharing

 

[assenucler]

Konuya çözüm gelmiştir. Katkıda bulunan dostlara en içten teşekkürler.

 

[assenucler]

Yusuf44,

Verdiğiniz destek için ne kadar teşekkür etsem az. Allah razı olsun.

 

[halilyor]

Sayın YUSUF44 formülle düzeltmek bir alternatif fakat manuel mi formla mı kayıt yapılıyor?
Sayın assenucler makro ile nasıl yapılabilir diye sormuş.