Excelden anlayan arkadaşlar yardım edebilir mi?

Kodla Büyü
Mesajlar
6
1.jpg

Merhaba arkadaşlar, elimde böyle bir liste var, bu listede tamamen boş olan satırları ctrl ile tek tek seçmeden silmek istiyorum. Bunun kolay bir yolu var mı acaba?
2.jpg

Sildikten sonra böyle olması gerekiyor.
 
Makrolarla yapabilirsiniz, örnek bir kod bırakıyorum aşağıya.

Sub bossatirsil()
For a = 1 To Sheets.Count
sat = Sheets(a).Cells.SpecialCells(xlCellTypeLastCell).Row
sut = Sheets(a).Cells.SpecialCells(xlCellTypeLastCell).Column
For b = sat To 1 Step -1
If WorksheetFunction.CountA(Sheets(a).Rows(b)) = 0 Then Sheets(a).Rows(b).Delete
Next
For c = sut To 1 Step -1
If WorksheetFunction.CountA(Sheets(a).Columns(c)) = 0 Then Sheets(a).Columns(c).Delete
Next
Next
End Sub

Kaynak:www.excelsizeyeter.com
 
Sub Sil()
Application.ScreenUpdating = False
For i = 20 To 1 Step -1

If WorksheetFunction.CountA(Rows(i)) = 0 Then Rows(i).Delete
Next
End Sub


Kodu deneyiniz.
20 satır sayısıdır. Satır sayınıza göre değiştiriniz.
 
Ekli dosyayı görüntüle 69236
Merhaba arkadaşlar, elimde böyle bir liste var, bu listede tamamen boş olan satırları ctrl ile tek tek seçmeden silmek istiyorum. Bunun kolay bir yolu var mı acaba?
Ekli dosyayı görüntüle 69237
Sildikten sonra böyle olması gerekiyor.
1. Tablonun tamamını normal yolla seçin.
2. Giriş sekmesinde Bul ve Seç'ten özel git' i tıklayın.
3. Gelen pencerede boşluklar seçeneğini seçip tamam'ı tıklayın. Boş satırlar seçilir.
4. Birinin üzerinde sağ tuşa basıp sil dedikten sonra satırları seçin.
5. Tamam dedikten sonra satırlar silinir.

Boş satırları tek tek seçmek yerine tüm boş satırları kolayca seçip siliyoruz bu şekilde mantık olarak.
 
iki makro da işe yaradı hocalarım, çok teşekkür ederim.
@acipinarli hocam dediğiniz şekilde yapınca benim istediğim gibi olmuyor. Cevabınız için size de çok teşekkür ediyorum.
evet şu na fark ettim bu durumda başında boşluk olan hücreleri de seçiyor ve sil deyince tüm tabloyu siliyor. ben tüm satırlar baştan dolu şekilde düşündüm sadece satırlar arasında boşluk varmış gibi
 
Geri
Üst