엑셀 하이퍼링크 일괄 적용하기

가끔 URL을 일일이 들어가는 작업을 하는 경우가 있습니다.
수백개의 링크를 일일히 링크를 걸고있긴 힘들겠죠
그럴대 쓰기 유용한 방법입니다. 


아래와 같이 URL 주소 부분을 블럭 설정을 합니다.

메뉴->보기->매크로 탭에 들어갑니다.

매크로 이름을 간단하게 정한후 만들기버튼을 누릅니다.

매크로 창이뜨면 아래와 같은 내용을 입력한후 메뉴에 매크로 실행버튼을 누릅니다.(f5)

Sub create_HLink()

   

    Dim C As Range

   

    For Each C In Selection

        If Not IsEmpty(C) Then

            C.Hyperlinks.Delete

            ActiveSheet.Hyperlinks.Add Anchor:=C, Address:=C.Value, TextToDisplay:=C.Value

        End If

    Next C

   

End Sub

아래 처럼 모두 하이퍼 링크가 걸려있는 것을 확인할 수 있습니다.

스샷을 너무 대충찍었네요..
귀찮으니 편집은 패스..