H

Çözüldü Bugünün tarihine kadar olan satırları silmek

  • Konuyu başlatan Konuyu başlatan hakki83
  • Başlangıç tarihi Başlangıç tarihi

hakki83

Site Üyesi
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.
 

Ekli dosyalar

Moderatörün son düzenlenenleri:
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.

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