Excel - OFFSET関数が非表示のセルをスキップすることは可能ですか？

Question

データをスクロールするためにスクロールバーに接続する非常に簡単なオフセット機能があります。 =OFFSET(A$2,$A$48,0)。セルA2~A45のデータをフィルタリングして特定のカテゴリのみを選択すると、オフセット機能をスクロールして隠れたセルをスキップし、フィルタリング後もまだ表示されているデータをスクロールすることができます。

Sub AddVisibleName() 

    Dim rVisible As Range 
    Dim lLastRow As Long 

    lLastRow = Range("A" & Rows.Count).End(xlUp).Row 

    Set rVisible = Range("A2:A45" & lLastRow).SpecialCells(xlCellTypeVisible) 

    ActiveWorkbook.Names.Add Name:="VisibleRange", RefersTo:=rVisible 

End Sub 

上記のコードは、表示されている非表示セルの値のみを持つ範囲 "VisibleRange"を作成します。これをOFFSET関数に組み込む方法はありますか？

私が好きなものを達成するための任意の他の単純な方法は

おかげ

Answer 1

んこのヘルプをも歓迎していますか？

Sub Macro1() 

    If Rows("1:10").EntireRow.Hidden = True Then 
     Rows("1:10").EntireRow.Hidden = False 
    ElseIf Columns("2:3").EntireColumn.Hidden = False Then 
     Columns("2:3").EntireColumn.Hidden = True 
    End If 

End Sub 

これは？

For i = 2 To 20 

    If Not Rows(i).Hidden 

    'do stuff 
End If 
End With