bibaram하이퍼링크는 편리한 기능이지만, 가끔 웹 문서 등에서 복사해 가져온 경우 불필요한 하이퍼링크를 한꺼번에 제거해야 할 필요가 있다. 엑셀 기본 기능은 이용하면 한번에 하나씩의 하이퍼링크만 제거가 가능하다.
아래의 방법으로 한꺼번에 특정 시트의 모든 하이퍼링크를 제거할 수 있다.
| 1. 제거할 하이퍼링크가 있는 시트를 선택한다. 2. Alt + F11 키를 눌러 VBA 편집기를 연다. 3. Ctrl + g 키를 눌러 직접 실행창을 연다. 4. 아래와 같이 입력하거나 아래 구문을 복사해 직접실행창에 붙여넣은 뒤 Enter를 누른다 ActiveSheet.Hyperlinks.Delete 3. Alt + q 키를 눌러 VBA편집기를 닫고 엑셀로 되돌아 간다. |
통합문서의 모든 하이퍼링크를 제거하려면 아래와 같은 프로시저를 실행한다.
| 1. Alt + F11 키를 눌러 VBA 편집기를 연다. 2. Alt + i + m을 누르거나 삽입 메뉴의 모듈을 선택해, 모듈을 추가한다. 3. 아래의 코드를 입력하거나 복사해 붙여넣기 한다. Sub dhDeleteAllHyperLinks() Dim s As Object For Each s In Sheets s.Hyperlinks.Delete Next s End Sub 4. F5키를 눌러 dhDeleteAllHyperLinks라는 프로시저를 실행한다 |
또다른 방법으로는 약간의 편법이 있긴합니다.
