A sütununda 45500 satır var
Exelde 5 Gün Öncesi Ve 5 Gün Sonrası
yalnız kodda var olan "SonStr = Cells(Rows.Count, 1).End(xlUp).Row" satırı 45500 satırın hepsini alması lazım
Cells(Rows.Count, 1).End(xlUp).Row kodu son satırı bulmaya yarar
Cells(Rows.Count, 1).End(xlUp).Row kodu son satırı bulmaya yarar
(07/10/2019, 19:51)cobra26 yazdı: Sayın,Berduş Bey dosyayı kapatıp açtıktan sonra çalıştı,çok teşekkür ederim, çok sağolun.
Son Düzenleme: 07/10/2019, 20:04, Düzenleyen: cobra26.
Konuyu Okuyanlar: 1 Ziyaretçi
