Conrad는 Excel에서 Word의 “작은 대문자”기능을 모방하려고합니다. 그가 이렇게 생각할 수있는 유일한 방법은 셀의 모든 문자를 통과하는 매크로를 개발하는 것입니다. 문자가 소문자이고 11pt이면 매크로는 문자를 대문자 9pt로 변경해야합니다.

문자가 대문자 (또는 문자가 아님)이면 영향을받지 않습니다. 문제는 Conrad가 설명 된 방식으로 셀의 개별 문자 서식에 영향을 미치는 방법을 모른다는 것입니다.

매크로를 사용하여 셀 내의 특정 문자에만 영향을 미치는 경우 각 셀에는 액세스하고 수정할 수있는 고유 한 Characters 컬렉션이 있음을 기억하는 것이 좋습니다. 컬렉션의 각 요소는 예상대로 셀의 단일 문자를 나타냅니다.

이를 통해 현재 셀에있는 내용을 검사하는 매크로를 구성 할 수 있으며 문자가 현재 소문자 인 경우 해당 문자 만 대문자로 변환하고 해당 문자의 글꼴 크기를 줄일 수 있습니다.

Sub SmallCaps()

Dim rCell As Range     Dim sWords As String     Dim sCharacter As String     Dim x As Long

'go through each cell in selection     For Each rCell In Selection         'Don't want to work on formulas         If Not rCell.HasFormula Then             sWords = rCell.Value 'Get the cell contents             For x = 1 To Len(sWords) 'Act on each letter                 sCharacter = Mid(sWords, x, 1)

If sCharacter >= "a" And sCharacter <= "z" Then                     'sCharacter is a lowercase letter                     With rCell.Characters(Start:=x, Length:=1)

'Decrease the font size by 2                         .Font.Size = .Font.Size - 2                         'Make character uppercase                         .Text = UCase(sCharacter)

End With                 End If             Next         End If     Next End Sub

이 매크로는 실행될 때 선택된 모든 셀에 대해 작동합니다.

셀에 수식이 포함되어 있지 않은지 확인한 다음 (수식 건너 뛰기) 셀의 소문자를 수정합니다.

이와 같은 매크로를 사용하는 데는 단점이 있으며이를 알고 있어야합니다. 가장 큰 단점은 실제로 세포의 내용을 수정한다는 것입니다. 완료되면 서식이 작은 대문자처럼 보이더라도 셀에 모두 대문자 텍스트가 포함됩니다. 즉, 나중에 매크로를 두 번째로 실행할 때 문제가 발생할 수 있으며 Excel의 교정 도구 (예 : 맞춤법 검사기)가 모두 대문자 인 단어에서는 작동하지 않습니다. (그러나 이러한 단어의 맞춤법을 검사하도록 Excel을 구성 할 수 있습니다.)

단점으로 인해 완전히 다른 접근 방식을 사용할 수 있습니다. 작은 대문자를 원하는 셀에 사용하는 글꼴을 변경하십시오. 웹에서 “작은 대문자 글꼴”(인용 부호 제외)을 검색하면 많은 후보를 찾을 수 있으며 그 중 상당수가 무료로 제공됩니다. 여기에 당신이 좋아하는 사이트가 있습니다 :

https://www.fontsquirrel.com/fonts/list/tag/small%20caps

원하는 글꼴 (이 또는 다른 평판이 좋은 소스에서)을 다운로드하고 시스템에 설치하기 만하면됩니다. Excel을 다시 시작하면 셀 서식을 지정하는 데 글꼴을 사용할 수 있습니다. 이러한 글꼴을 사용하도록 서식이 지정된 셀은 실제 셀 내용이 대문자와 소문자가 혼합되어 있더라도 텍스트를 작은 대문자로 표시합니다.

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

이 팁 (653)은 Microsoft Excel 2007, 2010, 2013 및 2016에 적용됩니다.