Excel에서 숨겨진 시트로 하이퍼링크를 따라가는 방법은 무엇입니까?

여러 워크시트가 포함된 통합 문서가 있고, 마스터 시트의 하이퍼링크를 사용하여 숨겨진 시트로 이동하려는 경우, 해당 시트가 숨겨지면 하이퍼링크가 비활성화되는 것을 확인할 수 있습니다. 이를 해결하기 위해 VBA 코드를 사용하여 하이퍼링크를 클릭하면 해당 숨겨진 시트가 자동으로 열리도록 할 수 있습니다. 이 문서에서는 이러한 기능을 구현하기 위한 단계별 지침을 제공하며, 마스터 시트로 돌아온 후 시트를 다시 숨길 수 있는 옵션도 제공합니다.

VBA 코드를 사용하여 하이퍼링크를 따라가 숨겨진 시트 열기

VBA 코드를 사용하여 하이퍼링크를 따라가 숨겨진 시트 열고 다시 숨기기

VBA 코드를 사용하여 하이퍼링크를 따라가 숨겨진 시트 열기

다음 VBA 코드는 관련 하이퍼링크를 클릭했을 때 숨겨진 워크시트를 열 수 있도록 도와줍니다. 아래 단계를 따르세요:

1. 하이퍼링크를 통해 숨겨진 시트로 이동하려는 시트 탭을 마우스 오른쪽 버튼으로 클릭하고, 컨텍스트 메뉴에서 보기 코드를 선택하세요. 나타난 Microsoft Visual Basic for Applications 창에서 다음 코드를 빈 모듈에 복사하여 붙여넣으세요:

VBA 코드: 하이퍼링크를 따라가 숨겨진 시트 열기:

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
'Updateby Extendoffice
    Application.ScreenUpdating = False
    On Error Resume Next
    If Target.Column = 1 Then
        Sheets(Target.Value).Visible = xlSheetVisible
        Sheets(Target.Value).Select
    End If
    Application.ScreenUpdating = True
End Sub

참고: 위 코드에서 If Target.Column = 1 Then 스크립트의 숫자 1은 하이퍼링크가 포함된 열 번호를 나타냅니다. 필요에 따라 변경하세요.

2. 그런 다음 코드 창을 저장하고 닫으세요. 이제 특정 숨겨진 시트로 연결되는 하이퍼링크를 클릭하면 해당 시트가 즉시 열립니다.

VBA 코드를 사용하여 하이퍼링크를 따라가 숨겨진 시트 열고 다시 숨기기

때로는 하이퍼링크를 따라가 숨겨진 시트를 열어야 하고, 마스터 시트로 돌아왔을 때 열린 시트를 다시 숨기고 싶을 수 있습니다. 아래 VBA 코드는 이를 도와줍니다:

1. 하이퍼링크를 통해 숨겨진 시트로 이동하려는 시트 탭을 마우스 오른쪽 버튼으로 클릭하고, 컨텍스트 메뉴에서 보기 코드를 선택하세요. 나타난 Microsoft Visual Basic for Applications 창에서 다음 코드를 빈 모듈에 복사하여 붙여넣으세요:

VBA 코드: 하이퍼링크를 따라가 숨겨진 시트 열고 돌아올 때 다시 숨기기:

Private Sub Worksheet_FollowHyperlink(ByVal Target As Hyperlink)
   'Updateby Extendoffice
    Application.ScreenUpdating = False
    Dim strLinkSheet As String
    If InStr(Target.Parent, "!") > 0 Then
        strLinkSheet = Left(Target.Parent, InStr(1, Target.Parent, "!") - 1)
    Else
        strLinkSheet = Target.Parent
    End If
    Sheets(strLinkSheet).Visible = True
    Sheets(strLinkSheet).Select
    Application.ScreenUpdating = True
End Sub

Private Sub Worksheet_Activate()
    On Error Resume Next
    Sheets(ActiveCell.Value2).Visible = False
End Sub

2. 그런 다음 코드 창을 저장하고 닫으세요. 하이퍼링크를 클릭하면 연결된 숨겨진 시트가 즉시 열립니다. 그러나 하이퍼링크가 포함된 마스터 시트로 돌아가면 열렸던 시트는 자동으로 다시 숨겨집니다.

참고: 이 코드는 하이퍼링크 텍스트와 일치하는 시트 이름에만 적용됩니다.

데모: VBA 코드를 사용하여 하이퍼링크를 따라가 숨겨진 시트 열기