hakki83

B Sütunundaki Boş Hücrenin Satırını Silen Kod

  • Konuyu başlatan Konuyu başlatan hakki83
  • Başlangıç tarihi Başlangıç tarihi
Durum
Üzgünüz bu konu cevaplar için kapatılmıştır...
hakki83

hakki83

Kullanıcı
Katılım
28 Tem 2022
Mesajlar
887
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.
 
listvievde satır seçmediniz uyarısı
VBA ile len kullanımı sonrası 0 ekleme

Ekli dosyalar

Çözüm
Ömer BARAN
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: 
İndirmek 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ı
Geri
Üst Alt