Bugünün tarihine kadar olan satırları silmek

[hakki83]

Excel Versiyonu

Excel 2016

Excel Sürümü

64 Bit

Excel Dili

Türkçe

Selamlar

Ekteki dosyada B sütununda tarihler, diğer sütunlarda da veriler vardır. B sütunundaki tarihlerden bugünkü tarihe kadar olan tüm satırları (bugünün tarihi hariç) makro ile sildirebilir miyiz?
Not: Tarihler değişkendir.
Teşekkürler.
Listede bugünün tarihi yok ise, bugünden sonraki en yakın ilk tarihe kadar silinebilir.

 

Textbox ile listboxta veri arama

Öğrenciler Arası Tercih İstatistiklerini Listeleme

[ExcelDepo]

Görüntülemek için giriş yapmanız gerekmektedir.
(9 satır)

Sanırım üstteki kodlar yeterli olur.

 

[Ömer BARAN]

Alternatif olsun.

Veri yığını büyükse tek tek silme zaman alabilir.
Tarihleriniz büyüklük sırasına göre sıralanmış durumdaysa; aşağıdaki kod daha hızlı sonuç verecektir.

Tüm SATIR silinecekse; End Sub satırının üstündeki iki satırdan, If .....Range("A2:G.... şeklindeki satırı silin.
Sadece A-G sütun aralığındaki hücreler silinecekse; End Sub satırının üstündeki iki satırdan, If .... Rows("2:" & ..... satırını silin.

Görüntülemek için giriş yapmanız gerekmektedir.
(8 satır)