Excel makro görünür ilk hücre seçme

[evrimmm]

Merhabalar,

Elimde rastgele ürün satışı olan bir liste var , makro ile örneğin X ürününe göre filtreleme yapıyorum ve başlıktan sonraki ilk görünür satırda ki B29 hücresine makro kodu ile gitmek istiyorum, aynı işlemi C ürününe göre filtreleme yapıyorum ve başlıktan sonraki ilk görünür hücre B171 hücresine gitmek istiyorum.Bu şekilde herhangi bir ürün için filtreleme yaptığımda B sütununda başlıktan sonra ilk görünen hücreye gidebilecek dinamik bir makro koduna ihtiyacım var, yardımcı olabilir misiniz ?

Şimdiden teşekkürler,

 

[askm]

Sub askm()
Dim son As Long
son = Range("A" & Rows.Count).End(3).Row
For i = 2 To son
    If Cells(i, 1).EntireRow.RowHeight > 0 Then
        Satir = i
        Exit For
    End If
Next i
MsgBox "Aranılan Satır  :  " & Satir, vbInformation, "ASKM"
Cells(Satir, 1).Select
End Sub

 

[Necdet]

Merhaba,

Alternatif olsun

Sub FiltreIlkHucre()

    Range("B2", Cells(Rows.Count, "B").End(xlUp)).SpecialCells(xlCellTypeVisible).Cells(1, 1).Select
    
End Sub

 

[evrimmm]

Sayın Askm,

Yardımlarınız için teşekkür ederim ,elinize sağlık

 

[evrimmm]

Sayın Necdet,

Yardımlarınız için teşekkür ederim, elinize sağlık