KoŞullu Sİlme

[oerbas]

Selamlar Arkadaşlar

C2 : H34 Hücre aralığını silen makroda aşağıdaki şartın uygulanmasını sağlayabilirmiyiz.
E Sütünundaki tarih bu güne eşit ve bugün tarihinden büyükse ilgili satır silinmesin

Yardımlarınıza şimdiden teşekür ederim

 

[ileriexcel]

Sub test()
For Each tar In Range("e1:e20")
If tar >= Date Then
Exit Sub
End If
Next
Range("c2:h34").Select
Selection.ClearContents
End Sub

 

[oerbas]

Cevabınız için teşekkür ederim ama kodu çalıştırdığımda aşağıdaki satır hata veriyor


For Each tar In Range("e1:e20")

 

[oerbas]

Sayın ileriexcel verdiğiniz kod hata verdi. Mümkünse çözüm için sizin ve diğer arkadaşlardan önerilerinizi bekliyorum.