George는 종종 워크 시트에 하이퍼 링크를 삽입합니다. 이 하이퍼 링크는 그의 컴퓨터 시스템에있는 다양한 유형의 파일에 대한 것입니다. 하이퍼 링크를 삽입 할 때 Excel에서 삽입하는 기본 하이퍼 링크 텍스트는 파일의 전체 경로와 파일 이름입니다. George는 기본적으로이 하이퍼 링크 텍스트가 전체 경로없이 파일 이름으로 만 구성되기를 원합니다.

원하는 결과를 얻을 수있는 매우 쉬운 방법이 있습니다. 하이퍼 링크를 원하는 파일이있는 동일한 폴더로 통합 문서를 이동하기 만하면됩니다. 하이퍼 링크 삽입 대화 상자를 사용하면 경로가없는 파일 이름이 링크에 사용됩니다.

이것이 가능하지 않은 경우 하이퍼 링크 삽입 대화 상자를 사용하면 하이퍼 링크 삽입 대화 상자의 주소 필드와 표시 할 텍스트 필드 모두에 전체 경로가 표시됩니다. 이 기본 동작을 변경할 수있는 방법은 없습니다. Excel에서 제안한 기본값 만 편집 할 수 있습니다. 즉, 개별 하이퍼 링크를 기준으로 하이퍼 링크 삽입 대화 상자에서 표시 할 텍스트 필드를 편집하여 원하는대로 파일 이름 만 표시 할 수 있습니다.

물론 여기에는 많은 편집이 필요하므로 George의 쿼리에 대한 자극이되었습니다. 이 문제를 해결하는 방법에는 몇 가지가 있습니다. 첫 번째는 하이퍼 링크 삽입 대화 상자에 의존하지 않는 것입니다. 대신 HYPERLINK 함수를 사용하여 하이퍼 링크를 삽입하는 수식을 작성하십시오. 예를 들어 C2 셀에 파일이 포함 된 폴더의 경로 이름이 있다고 가정 해 보겠습니다.

C:\Users\allen\Desktop\

또한 다음과 같이 D2 : D75 범위의 파일 이름 목록을 가질 수 있습니다.

MyWorkbook.xlsx MyDocument.docx MyPDF.pdf

E2 셀에 다음과 같은 수식을 넣을 수 있습니다.

=HYPERLINK($C$2 & D2,D2)

수식을 E3 : E75 범위로 복사하면 원하는대로 하이퍼 링크가 생성됩니다.

스프레드 시트에 이미 삽입 된 링크가 많이있는 경우 (예 : A 열) 좀 더 큰 수식을 사용하여 파일 이름 만 추출하고 표시 할 수 있습니다.

=HYPERLINK(A1,SUBSTITUTE(A1,LEFT(A1,FIND(CHAR(1),SUBSTITUTE(A1, "\",CHAR(1),LEN(A1)-LEN(SUBSTITUTE(A1,"\",""))))),""))

그런 다음 전체 경로 하이퍼 링크가 포함 된 열을 숨길 수 있으므로 원하는 단축 버전 만 볼 수 있습니다.

적용 할 하이퍼 링크가 많은 경우 매크로를 사용하여 기존의 모든 하이퍼 링크에서 경로를 제거 할 수 있습니다.

Sub FixHyperlinkDesc()

Dim h As Hyperlink     Dim sRaw As String     Dim iPos As Integer

For Each h In ActiveSheet.Hyperlinks         sRaw = h.TextToDisplay         iPos = Instr(1, sRaw, "\")

While (iPos > 0)

sRaw = Mid(sRaw, iPos + 1, Len(sRaw))

iPos  = Instr(1, sRaw, "\")

Wend         If sRaw <> h.TextToDisplay Then             h.TextToDisplay = sRaw         End If     Next h End Sub

매크로가 접촉하는 유일한 것은 각 하이퍼 링크의 표시 텍스트이며 최종 백 슬래시 이전의 모든 것을 삭제합니다. 매크로는 HYPERLINK 함수의 결과로 나타날 수있는 항목에 영향을주지 않습니다.

_ 참고 : _

이 페이지 (또는 ExcelTips 사이트의 다른 페이지)에 설명 된 매크로를 사용하는 방법을 알고 싶다면 유용한 정보가 포함 된 특별 페이지를 준비했습니다.

link : / excelribbon-ExcelTipsMacros [새 브라우저 탭에서 특별 페이지를 열려면 여기를 클릭하세요].

_ExcelTips_는 비용 효율적인 Microsoft Excel 교육을위한 소스입니다.

이 팁 (13279)은 Office 365의 Microsoft Excel 2007, 2010, 2013, 2016, 2019 및 Excel에 적용됩니다.