Eric은 약 3,500 개 레코드의 데이터베이스가 포함 된 공유 통합 문서를 가지고 있습니다. 각 레코드의 두 셀에는 전자 메일 주소와 URL이 있습니다. 새 레코드가 데이터베이스에 추가되면 전자 메일 주소와 URL이 하이퍼 링크 대신 일반 텍스트로 나타납니다. 하이퍼 링크로 만들려면 Eric은 통합 문서를 공유 해제하고 변경 한 다음 통합 문서를 다시 공유해야합니다. Eric은이 상황을 처리하는 더 쉬운 방법이 있는지 궁금해했습니다.

간단히 말해서 공유 통합 문서를 사용할 때는 하이퍼 링크를 추가하고 편집 할 수 없습니다. 가장 간단한 방법은 링크를 텍스트로 별도의 셀에 넣은 다음 HYPERLINK 수식을 사용하여 해당 셀을 참조하는 것입니다.

예를 들어, URL이 E2 셀에 입력 된 경우 다른 셀에서 다음 수식을 사용할 수 있습니다.

=HYPERLINK(E2, E2)

이 수식의 첫 번째 인수는 주소를 포함하는 셀에 대한 것이고 두 번째 인수는 하이퍼 링크에 대해 표시 할 텍스트에 대한 것입니다. 이 접근 방식에는 두 개의 추가 열 (HYPERLINK 수 식용)이 필요하지만 통합 문서를 공유 해제하고 다시 공유 할 필요는 없습니다.

유일한 다른 옵션은 통합 문서를 공유 해제하고 다시 공유하는 프로세스를 자동화 할 수있는 매크로를 만드는 것입니다. 다음 매크로는이 작업을 수행하고 선택한 셀에있는 모든 항목을 하이퍼 링크로 변환합니다.

Sub AddHyperlink()

Dim cell As Range

Application.DisplayAlerts = False

' Unshare the Workbook     If ActiveWorkbook.MultiUserEditing Then         ActiveWorkbook.ExclusiveAccess     End If

' Change address in cell to a hyperlink.

If ActiveCell = "" Then         ActiveCell.Hyperlinks.Delete     Else         For Each cell In Intersect(Selection, _           Selection.SpecialCells(xlConstants, xlTextValues))

With Worksheets(1)

.Hyperlinks.Add Anchor:=cell, _                   Address:=cell.Value, _                   ScreenTip:=cell.Value, _                   TextToDisplay:=cell.Value             End With         Next cell     End If

' Reshare the Workbook     If Not ActiveWorkbook.MultiUserEditing Then         ActiveWorkbook.SaveAs _           Filename:=ActiveWorkbook.FullName, _           AccessMode:=xlShared     End If End Sub

_ 참고 : _

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

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

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

이 팁 (3155)은 Microsoft Excel 97, 2000, 2002 및 2003에 적용됩니다. 여기에서 Excel (Excel 2007 이상)의 리본 인터페이스에 대한이 팁의 버전을 찾을 수 있습니다.

link : / excelribbon-Converting_to_Hyperlinks_in_a_Shared_Workbook [공유 통합 문서에서 하이퍼 링크로 변환].