문서의 서식을 지정할 때 굵은 체와 이탤릭체로 된 특정 단어 나 구절이 필요한 경우가 많습니다. Word에는 굵게 기울임 꼴을 적용하지만 굵게 기울임 꼴은 적용하지 않는 도구 (서식 도구 모음에 있음)가 포함되어 있습니다. 두 번의 클릭에 지쳐서 한 번에 두 형식을 모두 적용하는 도구를 만들었습니다. 결과 매크로는 굵게 및 기울임 꼴 도구 바로 옆에있는 도구 모음 도구에 할당 될 수 있습니다.

이를 수행하는 가장 간단한 방법은 다음과 같은 매크로를 사용하는 것입니다.

Sub BoldItalics1()

Selection.Font.Bold = True     Selection.Font.Italic = True End Sub

이 매크로는 속성을 설정하지만 토글은 수행하지 않습니다. 즉, 개별 굵게 및 기울임 꼴 도구를 사용하는 것처럼 동일한 매크로를 사용하여 굵은 기울임 꼴을 끌 수 없습니다. 이로 인해 변경하기 전에 선택한 텍스트의 상태를 확인하는 “차세대”매크로가 생성되었습니다.

Sub BoldItalics2()

Dim BIStatus As Integer

BIStatus = 0     If Selection.Font.Bold Then BIStatus = BIStatus + 1     If Selection.Font.Italic Then BIStatus = BIStatus + 1

If BIStatus = 0 Then         Selection.Font.Bold = True         Selection.Font.Italic = True     End If     If BIStatus = 1 Then         Selection.Font.Bold = True         Selection.Font.Italic = True     End If     If BIStatus = 2 Then         Selection.Font.Bold = False         Selection.Font.Italic = False     End If End Sub

매크로의 첫 번째 줄은 선택 항목에 대해 Bold 또는 Italic 속성이 설정되었는지 여부에 따라 변수 (BIStatus)를 증가시킵니다. 이러한 행이 완료되면 BIStatus는 선택한 텍스트가 굵게도 기울임 꼴이 아닌 경우 0, 굵게 또는 기울임 꼴이면 1, 굵게 및 기울임 꼴이면 2가됩니다.

BIStatus가 0 또는 1로 설정되면 선택한 텍스트에 대한 굵게 및 기울임 꼴 속성이 설정됩니다. 이전에 설정 한 경우 (BIStatus가 2) 두 속성이 모두 해제됩니다.

_ 참고 : _

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

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

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

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

link : / wordribbon-Applying_Bold_Italics [굵은 기울임 꼴 적용].