Please Enable JavaScript!
Gon[ Enable JavaScript ]

엑셀 Excel 텍스트 링크 삽입하는 방법

엑셀(Excel)/Excel

엑셀 Excel 텍스트 링크 삽입하는 방법

 

환경: Excel 365

 

엑셀에서 주소나 텍스트에 사이트 주소 링크를 거는 방법은 다양합니다. 사용자가 직접 URL 을 입력해서 링크를 걸거나 함수를 이용해서 텍스트를 조합해 만들 수도 있습니다. 여기에 더해서 VBA 코드로 엑셀 함수를 사용하지 않고 페이지 전체 하이퍼링크를 거는 방법도 알아볼 것입니다. 많은 양의 URL 에 하이퍼링크를 걸고 싶을 때 유용합니다.

 

사이트 주소를 입력해서 링크 걸기

 

하이퍼링크를 거는 간단한 방법은 문자열 앞에 httss:// 붙이는 것입니다. 정확한 도메인 주소를 입력하지 않아도 자동 링크가 걸립니다. 그림처럼 하이퍼링크가 걸리면 클릭 한번으로 연결된 웹페이지에 해당 사이트가 나타납니다. 브라우저는 윈도우 설정에서 어떤 것을 지정했는지에 따라 달라집니다. 보통 윈도우10 이면 엣지(Edge) 브라우저에 링크가 걸려 있을 겁니다. 만약 다른 브라우저로 바꾸고 싶다면 아래 링크를 따라가서 알려주는 대로 설정을 변경하시기 바랍니다.

 

[참고]

l  윈도우10 크롬을 기본 브라우저로 변경하는 방법

 

엑셀 Excel 텍스트 링크 삽입하는 방법

 

사이트 주소 텍스트에 링크 걸기

 

두 번째는 링크 메뉴를 이용하는 방법입니다. 셀 을 선택하고 오른쪽 마우스를 눌러 링크 메뉴를 클릭합니다

엑셀 Excel 텍스트 링크 삽입하는 방법

 

하이퍼링크 삽입 대화상자가 뜨면 주소 란에 링크할 URL 을 입력합니다. 그리고 Enter 를 눌러 창을 닫습니다. https:// 주소는 정확하게 입력하도록 합니다

엑셀 Excel 텍스트 링크 삽입하는 방법

 

HYPERLINK 함수를 이용해서 링크걸기

 

세 번째는 HYPERLINK 함수를 이용하는 것입니다. HYPERLINK 2개의 매개변수가 필요한데, 2번째 화면에 표시할 텍스트는 넣지 않아도 됩니다. 대신 첫 번째 매개변수로 입력한 URL 이 화면에 나타납니다.

 

HYPERLINK 함수 원형

l  Link_location : 링크 URL 을 입력한다.

l  friendly_name : (필수아님) 화면에 표시할 텍스트를 입력한다.

 

메인 URL 와 포스팅 번호를 합쳐서 하이퍼링크 텍스트를 만들어 보겠습니다. HYPERLINK 함수를 사용할 것입니다

엑셀 Excel 텍스트 링크 삽입하는 방법

 

첫 번째 매개변수에는 포스팅 번호와 URL 을 합친 문자열이 들어가야 하므로 문자를 더할 때 쓰는 & 연산자를 사용했습니다. 그리고 두 번째 매개변수에는 화면에 표시할 텍스트를 입력합니다

엑셀 Excel 텍스트 링크 삽입하는 방법

 


그림처럼 링크가 완료되었습니다. 다른 포스팅 번호도 동일하게 링크를 만들면 되겠죠

엑셀 Excel 텍스트 링크 삽입하는 방법

 

VBA 코드를 이용해서 추가하기

 

이번에는 엑셀 함수가 아닌 VBA 코드를 이용해서 한번에 링크 주소를 만들어 보겠습니다. URL 과 포스팅 번호를 합쳐서 완성된 링크를 만들어 셀에 추가할 것입니다

엑셀 Excel 텍스트 링크 삽입하는 방법

 

개발자 도구에서 VBA 편집 도구를 엽니다. 그리고 하이퍼링크를 만들 함수를 추가합니다

엑셀 Excel 텍스트 링크 삽입하는 방법

 

소스는 다음과 같습니다. 포스팅 번호 영역을 For 문으로 반복하면서 하이퍼링크를 만들어 셀에 추가합니다. 함수는 Hyperlinks.Add() 입니다. 첫 번째 매개변수는 URL 이 들어갈 셀이고 두 번째가 링크 주소입니다.

 

Sub HyperlinksAdd()

   

    Dim numRng As Range

    Dim urlRng As Range

   

    Set urlRng = Cells(3, "A") ' URL 이 있는 셀

    Set numRng = Range("B3:B15") ' 포스팅 번호가 있는 영역

 

    For Each numC In numRng

        totalUrl = urlRng.Value + numC.Value

        ActiveSheet.Hyperlinks.Add Cells(numC.Row, "E"), totalUrl

    Next

       

End Sub

 

엑셀 Excel 텍스트 링크 삽입하는 방법

 

결과는 다음과 같습니다. 함수 실행 한번으로 모든 링크 주소를 만들었습니다. 링크할 주소가 많다면 위의 소스를 응용해서 만들어 쓰는 것이 빠르고 효과적입니다

엑셀 Excel 텍스트 링크 삽입하는 방법


Posted by 녹두장군

댓글을 달아 주세요