Makro ile ara-bul-yaz

[bthn35]

Merhaba,
EK'teki excel'de A sütununda KARGO yazıp C sütununda bugünün tarihi olanları bulup D sütununa KARGOLANDI yazan bir makro yapılabilir mi?

 

[YUSUF44]

Deneyiniz:

Sub kargo()
son = Cells(Rows.Count, "a").End(3).Row
For i = 2 To son
    If Cells(i, "A") = "KARGO" And Cells(i, "C") = Date Then
        Cells(i, "D") = "KARGOLANDI"
    End If
Next
End Sub

 

[bthn35]

Çok teşekkür ederim, oldu