Peter는 매뉴얼을 작성하고 일반적인 방식으로 장의 목차를 자동 생성 할 수 있습니다. 이를 통해 독자는 목차 항목을 클릭하고 제목으로 이동할 수 있지만 제목을 클릭하고 목차로 돌아갈 수있는 방법은 없습니다. 따라서 독자는이를 수행 할 수 있습니다. Peter는 제목에 개별적으로 하이퍼 링크를 적용한 다음보기 흉한 밑줄을 제거해야합니다. 설명서의 장에는 수백 개의 제목이 포함될 수 있으므로 개별적으로 하이퍼 링크를 적용하는 작업이 어려울 수 있습니다. Peter는 필요에 따라 제목에 하이퍼 링크를 자동으로 추가하는 방법이 있는지 궁금합니다.

Peter의 접근 방식은 잘 의도되었지만 완전히 불필요합니다.

Word는 (Peter가 알고있는) TOC의 제목을 클릭 한 다음 (Peter가 알지 못하는) TOC의 해당 제목으로 돌아가는 방법을 제공합니다. 이 작업을 수행하기위한 특정 단축키는 Alt + 왼쪽 화살표입니다. 바로 가기는 목차의 하이퍼 링크를 클릭하기 전의 위치로 다시 이동하므로 긴 목차에 적합합니다. 목차의 시작 부분이 아니라 정확히 있던 위치로 돌아갑니다.

바로 가기 키는 독자에게 가장 적합한 솔루션입니다. 기본적으로 표준 Word 설치에서 작동합니다. 그러나 원하는 경우 ‘link : / wordribbon-Adding_Tools_to_the_Quick_Access_Toolbar [빠른 액세스 도구 모음]’에 뒤로 버튼을 추가하여 TOC의 출발 지점으로 돌아갈 수 있습니다. 다음 단계를 따르십시오.

  1. Word 옵션 대화 상자를 표시합니다. (Word 2007에서는 Office 단추를 클릭 한 다음 Word 옵션을 클릭합니다. Word 2010 이상 버전에서는 리본의 파일 탭을 표시 한 다음 옵션을 클릭합니다.)

  2. 대화 상자의 왼쪽에서 사용자 지정 (Word 2007) 또는 빠른 실행 도구 모음 (이후 버전의 Word)을 클릭합니다. (그림 1 참조)

  3. Choose Commands From 드롭 다운 목록을 사용하여 All Commands를 선택합니다.

  4. 명령 목록에서 뒤로 명령을 찾아 선택합니다.

  5. 추가 버튼을 클릭합니다. 이제 뒤로 명령이 빠른 실행 도구 모음 명령 목록의 대화 상자 오른쪽에 나타납니다.

  6. 빠른 실행 도구 모음 명령 내에서 뒤로 명령을 배치하려면 위쪽 및 아래쪽 화살표 단추를 사용합니다.

  7. 확인을 클릭하십시오.

이제 빠른 실행 도구 모음에 나타나는 뒤로 명령은 Alt + 왼쪽 화살표 바로 가기와 똑같은 기능을 수행합니다.

제목에 하이퍼 링크를 추가하려는 경우 프로세스를 자동화하는 유일한 방법은 매크로를 사용하는 것입니다. 다음 매크로는 문서의 첫 번째 목차에있는 각 항목을 단계별로 실행하고 텍스트 본문에서 참조 된 제목을 찾은 다음 목차에 다시 하이퍼 링크를 추가합니다.

Sub HyperlinkHeadings()

Dim hyp As Hyperlink     Dim toc As TableOfContents     Dim k As Long     Dim bkmk As String     Dim sCode As String     Dim fld As Field     Dim aRange As Range

If ActiveDocument.TablesOfContents.Count = 0 Then         MsgBox "There are no Tables of Contents in document"

Exit Sub     End If

Set toc = ActiveDocument.TablesOfContents(1)



For Each fld In toc.Range.Fields         sCode = fld.Code.Text         If InStr(sCode, "HYPERLINK") > 0 Then             bkmk = Mid(sCode, InStr(sCode, "_"))

bkmk = Left(bkmk, Len(bkmk) - 2)

fld.Select             ActiveDocument.Bookmarks.Add Range:=Selection.Range, _               Name:=bkmk & "R"



Set aRange = ActiveDocument.Bookmarks(bkmk).Range             aRange.Select             With ActiveDocument.Hyperlinks.Add(Anchor:=Selection.Range, _                 Address:="", SubAddress:=bkmk & "R", _                   TextToDisplay:=Selection.Text)

.Range.Select                 Selection.ClearCharacterAllFormatting             End With         End If     Next fld

Options.CtrlClickHyperlinkToOpen = False End Sub

_ 참고 : _

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

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

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

(Microsoft Word는 세계에서 가장 인기있는 워드 프로세싱 소프트웨어입니다.)이 팁 (13059)은 Microsoft Word 2007, 2010, 2013, 2016, 2019 및 Office 365의 Word에 적용됩니다.