Son Güncellenen Tarihli Satırları Renkli Yapma

[mavi.ist]

Merhaba ben hergün güncellediğim dosyada son eklediğim verilerin bulunduğu satırları sarı renkli yapmak istiyorum.Tabi hrgün güncelleme yaptığım için bir önceki günün renklendirmesinide temizleyecek.Bunun için vba'de koda yazdım önce çalıştı sonra hata verdi.Lütfen yardım

Birde günceleme yaptığım data hep bir önceki güne ait.Örnek raporuda koyuyorum.

 

[hamitcan]

Aşağıdaki kodu deneyin.

Sub AUTO_OPEN()
    Sheets("Sayfa1").[a4:n5000].Interior.ColorIndex = xlAutomatic
    For i = 4 To [d65536].End(3).Row
        If Sheets("Sayfa1").Cells(i, 4) = Date Then
          Sheets("Sayfa1").Range("a" & i & ":" & "n" & i).Interior.Color = vbYellow
        End If
    Next
End Sub

 

[mavi.ist]

Çok Teşekkür ederim hamit bey.Kod çalıştı ve çok işime yarıcak.