Satıra değer girilince ve silinince tarih-saat yazsın

[starmetin]

Merhabalar,

Arkadaşlar yapmak istediğim A sütunun herhangi bir satırına en az 1 karekterlik değer girildiğinde veya girilen satırdaki değer tamamen silindiğine B sutünuna tarih ve saat otomatik olarak yazılsın.

Aşağıdaki formülle değer girilince sıkıntım yok yalnız silinince formül nasıl çalışır.

=EĞER(UZUNLUK(A3)>=1;ŞİMDİ();"")

Ekte örnek dosya koydum yardımcı olabilecek arkadaşlara çok teşekkürler.

Hürmetler.

 

[Ömer]

Merhaba,

Bu işlemi makro ile yapabilirsiniz.

Çalışma sayfasının kod bölümüne;

Private Sub Worksheet_Change(ByVal Target As Range)
    
    If Intersect(Target, Range("A2:A" & Rows.Count)) Is Nothing Then Exit Sub
    
    If Target.Count > 1 Then Exit Sub
    
    Range("B" & Target.Row) = Now
        
End Sub

.

 

[starmetin]

Sayın : Ömer bey ,

çok teşekkürler bilgi paylaşımınız için.

Hürmetler.

 

[tactless]

Söylediğinizden 0 dışındaki durumlarda tarih atılsın diye anladım. Eğer öyleyse aşağıdaki formülü kullanabilirsiniz. Sayg.

=EĞER(YADA(A1>=1;A1="");ŞİMDİ();"")