Bugünün tarihini girme

Katılım
14 Mayıs 2010
Mesajlar
93
Excel Vers. ve Dili
2007 TÜRKÇE
Altın Üyelik Bitiş Tarihi
07-09-2024
Merhaba,
A1 hücresine herhangi bir değer girdiğimde B1 hücresine bugünün tarihinin atmasını istiyorum.
formül ile yapıyorum ama akşam özel yapıştır yaparak formülü kaldırmak zorunda kalıyorum.
Makro ile nasıl yapabiliriz.
Yardımlarınız için teşekkürler.
 

Necdet

Moderatör
Yönetici
Katılım
4 Haziran 2005
Mesajlar
15,372
Excel Vers. ve Dili
Ofis 365 Türkçe
Merhaba,

Bu konu çok işlenen konu da yine de kodları vereyim.
ilgili sayfanın kod bölümüne kopyalayıp yapıştırın.

Kod:
Private Sub Worksheet_Change(ByVal Target As Range)

    If Intersect(Target, [A1]) Is Nothing Then Exit Sub
    Range("B1") = Date
    
End Sub
 
Üst