Boş satırın silinmesi

[alfa&omega]

Merhaba,

veriler arasında bulunan boş satırları tek tek silmenin dışında başka bir yöntem varmıdır?

 

[Seyit Tiken]

Aşağıdaki kodu deneyin.

Sub Düğme1_Tıklat()
[A1:A100].SpecialCells(xlCellTypeBlanks).Delete
End Sub

 

[_KURTARICI_]

merhaba, bu komutla hücreler siliniyor. peki satırları nasıl silebiliriz. Yani A3 hücresi boş ise 3. satırı olduğu gibi nasıl silebiliriz. Teşekkürler.

 

[Korhan Ayhan]

Selamlar,

Aşağıdaki kodu kullanabilirsiniz.

Sub SİL()
    [A:A].SpecialCells(xlCellTypeBlanks).EntireRow.Delete
End Sub

 

[Seyit Tiken]

merhaba, bu komutla hücreler siliniyor. peki satırları nasıl silebiliriz. Yani A3 hücresi boş ise 3. satırı olduğu gibi nasıl silebiliriz. Teşekkürler.

Bende SATIR'ları siliyor. A sütununda, üst ve alt hücrelere veri girip, orta satırlardan bir kaçını boş bırakıp deneyiniz. Satırları mı? siliyor yoksa hücreleri mi?