en son satır renkli olması

[acar6783]

kolya gelsin..

sayfadaki verilerden her eklenen satıra göre en son satırın renklenmesı mümkünmüdür.
ya da
misal ''e'' sütununun en son hücresi renklenmesi mümkünmüdür.

 

[Ziynettin]

kolya gelsin..

sayfadaki verilerden her eklenen satıra göre en son satırın renklenmesı mümkünmüdür.
ya da
misal ''e'' sütununun en son hücresi renklenmesi mümkünmüdür.

Merhaba,

Aşağıdaki kodu denermisiniz

Private Sub Worksheet_Change(ByVal Target As Range)
 Dim son As Integer
        son = Range("E" & Rows.Count).End(3).Row + 1
    Range("E:E").Interior.ColorIndex = 0
    Range("E" & son).Interior.ColorIndex = 6
End Sub

 

[acar6783]

hata

kod hata veriyor
aşağıda resmini ekledim.
acaba ben mi yanlış yapıyorum?

 

[acar6783]

kod tamamdır kodun içine yazınca düzeldi..