Excel - OFFSET 함수가 숨겨진 셀을 건너 뛰도록 할 수 있습니까?

Question

데이터를 스크롤하는 스크롤 막대에 연결하는 아주 간단한 오프셋 기능이 있습니다. =OFFSET(A$2,$A$48,0). A2-A45 셀의 데이터를 필터링하여 특정 범주 만 선택하면 숨겨진 셀을 건너 뛰고 필터링 후에도 여전히 볼 수있는 데이터 만 스크롤하는 OFFSET 기능을 스크롤하고 싶습니다.

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