f2 uygulamasını birden fazla hücreye uygulamak

[scarlmd]

merhaba,
çalıştığımız programdan aldığımız raporları excelde düzenleyebilmek için tarih hücrelerinin tümüne f2 ile müdahale etmem gerekiyor.
fakat raporun satır sayısı çok fazla olduğundan bir hayli vakit kaybetmeme sebep oluyor
bunu topluca yapmanın yada formül ile değiştirmenin bir yolu varmıdır?
formül ile dönüşüm sağlasamda yeterli en azından dönüşen hüreleri değer kopyalaması yaparak normal bir rapor haline dönüştürebilirim die düşünüorum.
yardımcı olabilirseniz çok memnun olurum.
kısa bir örnek dosyası ekliyorum.

 

[Ayhan Ercan]

Merhaba,
Tarih biçimlerini değiştirmek isteidğiniz hücreleri topluca seçin,
Hücre Biçimlendirme > Tarih > 14.03.2001 seçin tamam deyin.
sonra hücreler üzerinde tekrar tarihi yazın.. 27/01/2008 gibi yazıp enterleyin. 27.01.2008 şeklinde hücrede görünecektir..

 

[Tarkan VURAL]

Alternatif;
Topluca değiştirmek için VBA kodlaması :

Sub ASutunu()
On Local Error Resume Next
For i = 2 To Range("a65536").End(3).Row
ay = Mid(Cells(i, 1).Value, 1, 2)
gun = Mid(Cells(i, 1).Value, 4, 2)
yıl = Mid(Cells(i, 1).Value, 7, 4)
Cells(i, "l").Value = FormatDateTime(gun & "." & ay & "." & yıl, vbShortDate)
Next i
End Sub

Sub BSutunu()
On Local Error Resume Next
For i = 2 To Range("a65536").End(3).Row
tarih = Mid(Cells(i, 2).Value, 2, 10)
Cells(i, "m").Value = FormatDateTime(tarih, vbShortDate)
Next i
End Sub

Sub ABSutunu()
On Local Error Resume Next
For i = 2 To Range("a65536").End(3).Row
ay = Mid(Cells(i, 1).Value, 1, 2)
gun = Mid(Cells(i, 1).Value, 4, 2)
yıl = Mid(Cells(i, 1).Value, 7, 4)
tarih = Mid(Cells(i, 2).Value, 2, 10)
Cells(i, "l").Value = FormatDateTime(gun & "." & ay & "." & yıl, vbShortDate)
Cells(i, "m").Value = FormatDateTime(tarih, vbShortDate)
Next i
End Sub

 

[scarlmd]

vba ?

ilginiz için ayrı ayrı teşekkür ederim.

tek tek F2 ile tarih düzeltmek çok uzun zamanımı alacağından ben bir çözüm arayışına girmiştim. kısa raporlarda tek tek tarih düzeltmeye üşenmiyorum önceden keşfetmiştim bunu ancak bu rapor yüzlerce satır içeriyor, o yüzden toplu bir çözüme ihtiyacım var.
vba kodlaması hiç yapmadım bugüne kadar, acaba kod sayfasını açıp yazdıkalrınızı yazıp kaydedersem sonra format değiştirdiğimde olurmu? yoksa başka türlü bir işlemmi yapmam gerek?

 

[scarlmd]

anladım vba çalışmalrını incele tembellik etme diosunuz ama en azından hangi blümde çözüm bulabileceim hakkında yol gösterseniz çok memnun olurdum.

 

[bulentkars]

Sayın Tarkan Beyin yazdığı makroyu dosyanıza koydum

 

[S.Yiğit]

Merhaba,

=--PARÇAAL(B2;2;10) formülü ile deneyebilirsiniz. Çıkan sonucu hücre biçimlendirden tarih formatına çevirirsiniz.