: S/W
엑셀에서 하이퍼링크 자동으로 생성/제거하는 방법 - 매크로 기능을 이용하여
CDL
2009. 8. 24. 17:24
# 하이퍼링크 생성 방법
: 아래 소스와 같이 'create_HLink' 매크로 생성 후, URL 정보가 있는 셀을 범위지정하고 'create_HLink' 매크로 실행
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
# 하이퍼링크 제거 방법
: 아래 소스와 같이 'delete_HLink' 매크로 생성 후, URL 정보가 있는 셀을 범위 지정하고 'delete_HLink' 매크로 실행
Sub delete_HLink() Selection.Hyperlinks.Delete End Sub