Cindy는 다른 문자로 단어를 “다시 입력”하는 방법이 있는지 물었습니다. 특히 그녀는 일부 캐릭터를 “x”하고 싶었습니다. 그녀는 취소 선을 원하지 않지만 실제로 문서에 이미있는 문자 위에 “x”문자를 사용하여 입력합니다.

Word에서이 작업을 수행하는 가장 좋은 방법은 \ o (오버 타이프) 스위치와 함께 EQ 필드를 사용하는 것입니다. 다음 단계를 따르십시오.

  1. x-ed out 텍스트를 표시 할 위치에 삽입 포인터를 놓습니다.

  2. Ctrl + F9를 누릅니다. Word는 필드 중괄호 세트를 삽입하고 그 가운데에 삽입 포인터를 둡니다.

  3. 필드 중괄호 안에 다음을 입력하십시오.

eq \o(my text,xxxxxxx)

  1. “내 텍스트”를 원하는 텍스트로 바꾸고 해당 텍스트를 덮을 수있는 충분한 x 문자가 있는지 확인하십시오.

  2. 필드를 축소하고 결과를 표시하려면 Shift + F9를 누릅니다.

이 필드 접근 방식은 짧은 텍스트 선택에 적합하며 이러한 방식으로 영향을 미치려는 텍스트가 많은 경우 항상 매크로로 변환 할 수 있습니다. 다음 매크로는이 개념을 훨씬 더 전달합니다. x 문자를 빨간색으로 겹쳐서 표시하고 공백을 겹쳐 쓰지 않습니다.

Sub OverstrikeWithX2()

Dim i As Integer     MyString = Selection.Text

' Insertion point only/single character/multiple character range handler     If Selection.Characters.Count = 1 Then         Selection.MoveRight Unit:=wdCharacter, Count:=1, Extend:=wdExtend         If Selection.Characters.Count = 2 Then             Selection.MoveLeft Unit:=wdCharacter, Count:=2, Extend:=wdExtend         Else             Selection.MoveLeft Unit:=wdCharacter, Count:=1         End If     Else         Selection.MoveLeft Unit:=wdCharacter, Count:=1     End If     ' end range handler

For i = 1 To Len(MyString)

Selection.MoveRight Unit:=wdCharacter, Count:=1, Extend:=wdExtend         ' paragraph marker and space handler         If Selection.Text = Chr(13) Or Selection.Text = " " Then             While Selection.Text = Chr(13) Or Selection.Text = " "

If i = Len(MyString) Then                     Selection.MoveRight Unit:=wdCharacter, Count:=1                     Exit Sub                 Else                     i = i + 1                     Selection.MoveRight Unit:=wdCharacter, Count:=1                     Selection.MoveRight Unit:=wdCharacter, Count:=1, _                       Extend:=wdExtend                 End If             Wend         End If         ' end paragraph marker & space handler

With Selection             .Fields.Add Range:=Selection.Range, Type:=wdFieldEmpty, _               PreserveFormatting:=False             .TypeText Text:="eq \o("

.MoveRight Unit:=wdCharacter, Count:=1             .TypeText Text:=",x)"

.Delete Unit:=wdCharacter, Count:=1

' The next three lines turns the overstike "x" red             .MoveLeft Unit:=wdCharacter, Count:=1             .MoveLeft Unit:=wdCharacter, Count:=1, Extend:=wdExtend             .Font.Color = wdColorRed             .Fields.ToggleShowCodes             .MoveRight Unit:=wdCharacter, Count:=1         End With     Next i End Sub

매크로는 겹쳐 쓰는 각 문자에 대해 단일 필드를 추가하므로 거의 모든 길이의 텍스트에 적합합니다.

이번에는 텍스트 상자를 사용하는 완전히 다른 접근 방식을 시도해 볼 수도 있습니다. 그리기 도구 모음을 사용하여 텍스트 상자를 만듭니다.

텍스트 상자 안에 원하는 글꼴과 크기로 원하는만큼 x 문자를 입력합니다. 텍스트 상자의 서식이 채워 져서 (투명하게), 주변 선이없고 텍스트 줄 바꿈없이 텍스트 위에 떠 있는지 확인합니다. 텍스트 상자를 텍스트 위로 드래그하여 x-ed 아웃하고 필요에 따라 크기를 조정합니다.

_ 참고 : _

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

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

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

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

link : / wordribbon-X-ing_Out_Text [X-ing Out Text].