2 şarta göre satır gizlemek

[ocamsul]

Selam arkadaşlar herkese iyi tatiller ve uğraşımız ile ilgilenenlere(EXCEL) iyi çalışmalar.

iki koşulum var
aralığımız P13:Q33 bu aralıktaki hücrelerde değer yok yada formüle bağlı sonuç "0" yada eksi ise o satırlar gizlenecek ama bu aralıktaki "p" yada "Q" sütunlarından birisinde artı değer var ise gizlenmeyecek. Yardımlarınızı bekliyorum.

Biraz arama yaptım ancak durumuma uygun bir yöntem bulamadım dostlar.

 

[ocamsul]

Öneri yokmu dostlar?

 

[irfancantr]

Belki bu işinize yarayabilir...

 

[ocamsul]

Belki bu işinize yarayabilir...

SN: irfancantr; Teşekkür ederim ancak filtre uygulaması bu tür bir sayfada yapamam.

 

[ocamsul]

Çözemedim arkadaşlar.

help help !!!

 

[irfancantr]

birde buna bak

 

[ocamsul]

birde buna bak

SN: irfancantr; ilginize çok teşekkür ederim. Ancak benim 2 kriterim var 1. P13 ile Q30 arasındaki değerler + ise satır gizlenmicek. 2. P13 ile Q30 arasındaki P yada Q farketmez aralığındaki değerlerden herhangibirisi - yada + ise satırı yine gizlemicek. diğer durumlarda satır gizlenecek.

 

[Korhan Ayhan]

Selamlar,

Aşağıdaki kodu denermisiniz.

Option Explicit
 
Sub KOŞULA_GÖRE_SATIR_GİZLE()
    Dim Hücre As Range
    Application.ScreenUpdating = False
    Cells.EntireRow.Hidden = False
    For Each Hücre In Range("P13:P30")
    If (Hücre.Value <= 0 And Hücre.Offset(0, 1).Value <= 0) Then Rows(Hücre.Row).Hidden = True
    Next
    Application.ScreenUpdating = True
    MsgBox "İşleminiz tamamlanmıştır.", vbInformation
End Sub

 

[ocamsul]

Korhan hocam eyvallah. Olay bu işte. Çok teşekkür ederim.