Excelde Tüm Sutunları Boş Olan Satırları Topluca Nasıl Silebiliriz - Baskı Önizleme +- AccessTr.neT (https://accesstr.net) +-- Forum: Microsoft Excel (https://accesstr.net/forum-microsoft-excel.html) +--- Forum: Excel Cevaplanmış Soruları (https://accesstr.net/forum-excel-cevaplanmis-sorulari.html) +--- Konu Başlığı: Excelde Tüm Sutunları Boş Olan Satırları Topluca Nasıl Silebiliriz (/konu-excelde-tum-sutunlari-bos-olan-satirlari-topluca-nasil-silebiliriz.html) |
Cvp: Excelde Tüm Sutunları Boş Olan Satırları Topluca Nasıl Silebiliriz - accessman - 14/01/2020 özellikle data sayfası olarak kullandığımız Excel sayfalarında satır tamamen boş ise son eklediğim kod ile sayfa ismini girerek satırı silebiliyoruz (daha denemedim) Cvp: Excelde Tüm Sutunları Boş Olan Satırları Topluca Nasıl Silebiliriz - accessman - 14/01/2020 birde bu varmış gerçek son satırı bulup sonra boşları siliyormuş Kod:
Function XLBlank() Cvp: Excelde Tüm Sutunları Boş Olan Satırları Topluca Nasıl Silebiliriz - accessman - 14/01/2020 son satırın belirlenebileceği farklı bir kod Kod:
Sub delete_rows_blank2() Cvp: Excelde Tüm Sutunları Boş Olan Satırları Topluca Nasıl Silebiliriz - accessman - 14/01/2020 5. mesajda eklediğim kod gayet güzel çalışıyor. Herhangi bir modüle ekleyin Call DeleteBlankRows diyerek kullanın Cvp: Excelde Tüm Sutunları Boş Olan Satırları Topluca Nasıl Silebiliriz - feraz - 15/01/2020 (14/01/2020, 12:40)accessman yazdı: 5. mesajda eklediğim kod gayet güzel çalışıyor. Herhangi bir modüle ekleyin Normalde döngü ile boş satırları silme uzun iş. Çok kısa yöntemi var onu eklerim sonra. Birde boş satır yada koşullu satır silmek için döngü kullanılacaksa alttaki kibi kalıpla olabilir.kodu kafadan yazacağım için sorun yada eksik olabilir. For i = 500 to 1 step -1 İf cells(i,1).value="" then rows(i).entirerow.delete Next Cvp: Excelde Tüm Sutunları Boş Olan Satırları Topluca Nasıl Silebiliriz - feraz - 15/01/2020 Kod:
Range("A2:D500").SpecialCells(xlCellTypeBlanks).select Yol göstermesi için örnek ekledim. |