makroyla satır gizleme

[bay_musti]

merhaba üstatlar ben bi excel tablosunda mesele A sütünunda veri olmayan satırların gizlenmesini istiyorum ama A sütunun da bütün satırlarda ya değer var ya da formül, yani "eğer" formulüyle oraya bi değer veya boşluk atıyo boşluk olan satırların gizlenmesini istiyorum yardımcı olabilirseniz sevinirim teşekkürler ( boşluk yerine başka bi değer de atanabilir mesle "2" olan hücrelerin gizlenmesi gibi )

 

[Recep İpek]

Merhaba,

Konu ile ilgili aşağıdaki linkleri inceleyebilirsiniz.

http://www.excel.web.tr/f48/c-kolonunda-s-f-r-olanlar-d-kolonunda-t60385.html

http://www.excel.web.tr/f48/bos-sat-rlar-otomatik-gizleme-t66561.html

http://www.excel.web.tr/f48/degeri-0-dan-kucuk-olan-sat-r-ve-t58616.html

 

[Korhan Ayhan]

Selamlar,

Aşağıdaki kodu kullanabilirsiniz.

Option Explicit
 
Sub BOŞ_SATIRLARI_GİZLE()
    Dim X As Long
    
    Cells.EntireRow.Hidden = False
    
    For X = 1 To [A65536].End(3).Row
    If Cells(X, 1).Value = "" Then Rows(X).Hidden = True
    Next
    
    MsgBox "İşleminiz tamamlanmıştır.", vbInformation
End Sub

 

[bay_musti]

teşekkürler aceleci davrandım google da aratıp göremeynce yok sandım ama içerde aratınca buldum teşekkürederim ilginize