Excel: 링크 오류 수정 방법

Excel에서는 관련 정보를 참조하기 위해 다른 워크북으로의 링크가 자주 사용됩니다. 그러나 소스 워크북이 이름이 변경되거나 다른 위치로 이동되면 이러한 링크가 깨질 수 있으며, 이로 인해 오류가 발생할 수 있습니다. 이 튜토리얼에서는 링크 편집 기능 또는 VBA 코드를 사용하여 워크북에서 깨진 링크를 신속하게 식별하고 수정하는 두 가지 효과적인 방법을 제공합니다.

링크 편집 적용으로 깨진 링크 수정

VBA 코드를 사용하여 깨진 링크 수정

Excel에서는 링크 편집 대화 상자를 열어 하나씩 수정할 수 있습니다.

1. 깨진 링크가 포함된 워크북을 활성화하고 클릭하세요 데이터 > 링크 편집 ( 쿼리 및 연결 그룹).

2. 링크 편집 대화 상자에서 상태 확인 누르면 어떤 링크가 깨졌는지 확인할 수 있습니다.
 

3. 그런 다음 깨진 링크를 클릭한 후 소스 변경 버튼을 클릭하세요. 소스 변경 창에서 올바른 소스 워크북을 선택하고 확인.

을 클릭하세요. 이제 상태가 오류 에서 확인으로 변경된 것을 볼 수 있습니다. 3단계를 반복하여 다른 깨진 링크도 수정하세요.

이 섹션에서는 깨진 링크를 수정하는 데 도움이 되는 VBA 코드를 소개합니다.

1. 깨진 링크를 수정하려는 워크북을 활성화하고 Alt + F11 키를 누릅니다.

2. 그러면 나타나는 Microsoft Visual Basic for Applications 창에서 삽입 > 모듈 을 클릭하여 새 빈 모듈을 생성합니다.

3. 아래 코드를 새 모듈에 복사하여 붙여넣습니다.

VBA: 깨진 링크 수정

Sub ResetInvalidLinks()
'UpdatedbyExtendoffice20220701
Dim xWB As Workbook
Dim xLks As Variant
Dim xFNum, xStatus As Integer
Dim xStrLk, xLinAddress As String
Dim xF
Dim xLk
Set xWB = Application.ActiveWorkbook
xLks = xWB.LinkSources(xlExcelLinks)
If IsEmpty(xLks) Then
    MsgBox "Select updated source"
    Exit Sub
End If
On Error Resume Next
For xFNum = LBound(xLks) To UBound(xLks)
    xStrLk = xLks(xFNum)
    xStrLk = Right(xStrLk, Len(xStrLk) - InStrRev(xStrLk, "\"))
    xStatus = ActiveWorkbook.LinkInfo(xStrLk, xlLinkInfoStatus)
    If xStatus <> 0 And xStatus <> 3 Then
        MsgBox xStrLk & " the link is broken, please select new source"
        xF = Application.GetOpenFilename()
        If xF <> "" Then
            For Each xLk In ActiveSheet.UsedRange.Hyperlinks
                xLinAddress = Right(xLk.Address, Len(xLk.Address) - InStrRev(xLk.Address, "\"))
                    If InStr(xStrLk, GetAddress) <> 0 Then
                        ActiveSheet.Hyperlinks.Add Anchor:=xLk.Range, Address:=xF
                    End If
            Next
            ActiveWorkbook.ChangeLink xLks(xFNum), xF, xlLinkTypeExcelLinks
        End If
        End If
    Next
End Sub

4. F5 키를 누르거나 실행 버튼을 클릭하세요. 코드를 실행하면 깨진 링크가 있는지 검색합니다. 만약 있다면, 어떤 링크가 깨졌는지를 알려주는 대화 상자가 나타납니다. 새로운 소스를 선택하세요. 그리고 확인 을 클릭하여 계속 진행합니다.

5. 열기 창에서 업데이트된 소스를 선택하고 확인.

을 클릭하세요. 워크북에 여전히 깨진 링크가 남아 있으면 위의 대화 상자가 모든 깨진 링크가 수정될 때까지 다시 나타납니다.

참고: 워크북에 깨진 링크가 없으면 VBA는 실행 후 중지됩니다.

팁: 모든 추가 링크를 보고 깨진 링크를 제거하려면 Kutools for Excel의 링크 찾기 및 해제 기능이 좋은 도우미가 될 것입니다.

이 기능에 대해 자세히 알아보려면 자세한 튜토리얼을 참조하세요.