dememizin kolay bir yolu var mı?
Makro ile mümkün.
Sub sil()
For i = 100 to 1 step -1
If cells(i,3) = "" then rows(i).delete
Next i
End Sub
Bu makro ilk C1:C100 aralığında boş olan hücrelerin satırlarını siler.
If satırındaki = yerine <> koyarsan boş yerine dolu olan satırları siler.
teşekkürler.
"C sütunu" bilgisi burada nerede yazıyor? yani dolu olanları sil diyeceksem C değil D sütunu olacak, ona göre değiştireyim.
A,b,c =1,2,3
Özetle 3 yazan yer
peki işi zorlaştırayım.
C sütunundaki hücre içeriğinde "HEDE" ifadesi GEÇEN hücrelerin olduğu satırları silmesi için tırnak işaretlerinin içine ne yazmalıyım?
hücre içeriği aynen olmayacak ama, yani C sütunundaki hücrede sadece "HEDE" yazanları değil "GAYDIRIGUBBAK HEDEHEBELE HÜBELE" yazan satırı da silecek.
"*HEDE*"
"*HEDE*" olmadı.
"*HEDE*" olayını
daha önce yapmıştım. Geçmiş çalışmalarıma bakmam lazım. bulunca yazarım.
Like da olmadı.
Sub sil()
For i = 100 to 1 step -1
If Instr(1,cells(i,3),"HEDE") > 0 then rows(i).delete
Next i
End Sub
Instr fonksiyonu hücre içinde arama yapar ve bulursa aradığın değerin kaçıncı karakterde başladığını söyler. Bulamazsa 0 döner.