필드 코드는 문서에서 매우 유용 할 수 있습니다. 어느 시점에서 다른 사람과 필드 코드를 공유 할 수 있습니다. 코드를 텍스트로 표시해야하는 교육 문서를 준비 중이거나 필드 코드를 다른 사람에게 이메일로 보내려고 할 수 있습니다.

문제는 단순히 필드 코드를 복사하여 붙여 넣는 경우 붙여 넣은 실제 코드가 아니라는 것입니다. 해당 필드 코드의 결과입니다. 물론 필드 코드 (Shift + F9)를 표시하고 중괄호 안에 삽입 포인터를 놓고 닫는 중괄호를 제외한 모든 문자를 신중하게 선택한 다음 클립 보드에 복사 할 수 있습니다.

그러나 이러한 접근 방식은 매우 서둘러 지루할 수 있습니다. 더 나은 방법은 매크로를 사용하여 필드 코드를 표시하고 원하는 정보를 클립 보드에 채우는 것입니다. 다음 매크로는이를 수행합니다.

Sub StuffFieldCode()

Dim sField As String     Dim sTextCode As String     Dim bSFC As Boolean     Dim MyData As DataObject     Dim sTemp As String     Dim J As Integer

Application.ScreenUpdating = False

If Selection.Fields.Count = 1 Then         bSFC = Selection.Fields.Item(1).ShowCodes         Selection.Fields.Item(1).ShowCodes = True         sField = Selection.Text         sTextCode = ""

For J = 1 To Len(sField)

sTemp = Mid(sField, J, 1)

Select Case sTemp                 Case Chr(19)

sTemp = "{"

Case Chr(21)

sTemp = "}"

Case vbCr                     sTemp = ""

End Select             sTextCode = sTextCode & sTemp         Next J

Set MyData = New DataObject         MyData.SetText sTextCode         MyData.PutInClipboard                  Selection.Fields.Item(1).ShowCodes = bSFC     End If

Application.ScreenUpdating = True End Sub

매크로는 화면 업데이트를 끄는 것으로 시작한 다음 선택 항목에 필드가 하나만 포함되어 있는지 확인합니다. (매크로를 실행하기 전에 원하는 필드를 선택해야합니다.) 단일 필드가 포함 된 경우 해당 필드의 필드 코드가 표시되고 변수 (sField)에 할당 된 다음 문자별로 구분됩니다. 검사중인 문자가 여는 중괄호 (Chr (19))이면 일반 여는 중괄호로 바뀝니다. 닫는 필드 중괄호 (Chr (21)) 인 경우 일반 닫는 중괄호로 바뀝니다. 마지막으로 문자가 단락 끝 표시 자 (vbCr)이면 해당 문자는 무시됩니다.

마지막으로 PutInClipboard 메서드는 필드 코드의 텍스트 버전을 클립 보드에 채우는 데 사용됩니다. 그런 다음 일반 붙여 넣기 명령 (Ctrl + V)을 사용하여 문서, 전자 메일 또는 다른 프로그램에 필드 코드를 붙여 넣을 수 있습니다.

_ 참고 : _

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

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

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

(Microsoft Word는 세계에서 가장 인기있는 워드 프로세싱 소프트웨어입니다.)이 팁 (3844)은 Microsoft Word 97, 2000, 2002 및 2003에 적용됩니다. Word의 리본 인터페이스에 대한이 팁 버전 (Word 2007)을 찾을 수 있습니다. 이후) 여기 :

link : / wordribbon-Copying_and_Pasting_Field_Codes [필드 코드 복사 및 붙여 넣기].