George는 문서에서 선택한 일부 텍스트의 단어 사이의 공백 만 압축하려고합니다. 그는 각 공간의 포인트 크기를 한 번에 하나씩 변경할 수 있습니다. 또한 공간을 찾아서 글꼴 크기가 더 작은 공간으로 대체하여이를 수행 할 수도 있습니다. 그러나 그는 공간의 크기를 단계적으로 줄이고 자합니다. (예 : 각 단계에서 0.1 점)

Word에서는 글꼴 크기를 10 포인트 단위가 아닌 절반 단위로만 조정할 수 있기 때문에 George가 원하는대로 정확히 수행 할 수 없습니다. 한 번에 절반 씩 감소하면 가장 좋은 방법은 매크로를 사용하는 것입니다.

Sub StepSpaceFontSize()

Dim F As Double     Dim C As Long

For C = 1 To Len(Selection)

If Asc(Mid(Selection, C, 1)) = 32 Then             F = Selection.Range.Characters(C).Font.Size             If F > 5 Then                 Selection.Range.Characters(C).Font.Size = (F - 0.5)

End If         End If     Next C End Sub

매크로는 선택한 텍스트의 각 문자를 단계별로 실행하며 문자가 공백 인 경우 해당 공백의 포인트 크기를 줄입니다. 매크로는 글꼴 크기에 대해 하한을 적용합니다. 5 포인트로만 내려갑니다.

_ 참고 : _

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

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

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

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