Tarih sorunu

[Yesilyurtlu]

Sayfa4.[F6] = "=Today()"

Yukarıda ki makroyu 31.07.2010 Cumartesi günü Saat 10:00
içinde bulunduğu tarihi, günü, saatı alacak şekilde düzenlememe yardımcı olabilir misiniz?

 

[Metin Karaağaç]

=NOW()
şeklinde değiştirseniz olmaz mı?

 

[Yesilyurtlu]

Metin Abi Değişen bir şey olmadı

 

[Korhan Ayhan]

Selamlar,

Aşağıdaki kodu denermisiniz.

Saniyeli görüntülemek için;

Option Explicit
 
Sub TARİH()
    Sheets("Sayfa1").Range("A1") = Format(Now, "dd.mm.yyyy dddd") & " Günü Saat " & Time
End Sub

Saniyesiz görüntülemek için;

Option Explicit
 
Sub TARİH()
    Sheets("Sayfa1").Range("A1") = Format(Now, "dd.mm.yyyy dddd") & " Günü Saat " & Format(Time, "hh:mm")
End Sub

 

[Yesilyurtlu]

Korhan abi teşekkür ederim