H

Çözüldü B Sütunundaki Boş Hücrenin Satırını Silen Kod

Durum
Üzgünüz bu konu cevaplar için kapatılmıştır...
H

hakki83

Site Üyesi
Excel Versiyonu
Excel 2016
Excel Sürümü
32 Bit
Excel Dili
Türkçe
Örnek dosyadaki
A sütunu için olan ve
Komut buton 1’le çalışan kod, arşivimde duruyordu.

Ben de deneme yanılmayla
(Komut buton 2)
B sütunu için olanını yapmaya çalışım.
If Cells satırındaki 1 rakamını 2 yaptım ve oldu.

Fakat bir şeyden emin olamadım.
Range’nin yanındaki A1’i
B1 yapmamız gerekiyor mu?

Yani A1 mi olmalı o kısım B1 mi, emin olamadım.
Hocalarımıza sormak istedim.
 

Ekli dosyalar

Çözüm
Ö
Range("A1") de sorun yok, B1 diye değiştirmeniz de sonucu değiştirmez.
Hatta teknik bakımdan Activesheet.UsedRange veya Activesheet.Cells [A1].CurrentRegion.SpecialCe.... de kulanılabilir.
Çünkü tespit edilen şey, sol üstten sağ alta doğru kullanılmış son hücre SpecialCells(xlLastCell) satır numarası.
Tarihe göre sırala Oylamaya göre sırala
Range("A1") de sorun yok, B1 diye değiştirmeniz de sonucu değiştirmez.
Hatta teknik bakımdan Activesheet.UsedRange veya Activesheet.Cells [A1].CurrentRegion.SpecialCe.... de kulanılabilir.
Çünkü tespit edilen şey, sol üstten sağ alta doğru kullanılmış son hücre SpecialCells(xlLastCell) satır numarası.
 
Oyla 0 Olumsuz oyla
Çözüm
Aslına bakarsanız; madem kriteriniz tek sütundaki BOŞ hücrelerin satırlarını silmek,
o zaman For....If .... End If .... Next yapısı hiç kullanılmadan da sonuç alınabilir.
Veri yığınının büyüklüğüne veya belgedeki formül yoğunluğuna bağlı olarak
tek tek hücre kontrol edip, "boşsa o satırı sil" işlemi yavaş tamamlanabilir.

Bunun yerine silme işlemi TEK ADIMda ve döngü kurmadan şöyle de yapılabilir.

VBA: 
Görüntülemek için giriş yapmanız gerekmektedir.
(2 satır)
 
Oyla 0 Olumsuz oyla
Durum
Üzgünüz bu konu cevaplar için kapatılmıştır...

Benzer Konular Popüler İçerikler Daha Fazlası

Üst