Excel의 워크시트에서 하이퍼링크가 있는지 확인하는 방법은 무엇입니까?

선택한 범위에 하이퍼링크가 있는지 확인하려면 다음 VBA 코드를 사용할 수 있습니다.

VBA 코드를 사용하여 선택 항목에 하이퍼링크가 있는지 확인하기

VBA 코드를 사용하여 선택 항목에 하이퍼링크가 있는지 확인하기

다음 VBA 코드를 사용하여 선택 항목이나 워크시트에 하이퍼링크가 있는지 확인할 수 있습니다.

1. Alt + F11 키를 동시에 눌러 Microsoft Visual Basic for Applications 창을 엽니다.

2. Microsoft Visual Basic for Applications 창에서 삽입 > 모듈을 클릭합니다. 그런 다음 다음 VBA 코드를 코드 창에 복사하고 붙여넣습니다.

VBA: 선택 항목에 하이퍼링크가 있는지 확인하기

Sub HyperlinkCells()
    Dim xAdd As String
    Dim xTxt As String
    Dim xCell As Range
    Dim xRg As Range
    On Error Resume Next
    xTxt = ActiveWindow.RangeSelection.AddressLocal
    Set xRg = Application.InputBox("Please select range:", "Kutools for Excel", xTxt, , , , , 8)
    If xRg Is Nothing Then Exit Sub
    For Each xCell In xRg
        If xCell.Hyperlinks.Count > 0 Then xAdd = xAdd & xCell.AddressLocal & ", "
    Next
    If xAdd <> "" Then
        MsgBox "Hyperlink existing in the following cells: " & vbCrLf & vbCrLf & Left(xAdd, Len(xAdd) - 1), vbInformation, "Kutools for Excel"
    End If
End Sub

3. 코드를 실행하기 위해 F5 키를 누릅니다. 그러면 Kutools for Excel 대화 상자가 나타나며, 하이퍼링크를 확인하고자 하는 범위를 선택하고 확인 버튼을 클릭하세요.

그런 다음 선택된 범위 내에 하이퍼링크가 포함된 셀 목록이 표시되는 대화 상자가 나타납니다.