텍스트가 상당히 많은 워크 시트를 사용하는 경우 대문자와 소문자를 쉽게 변환하는 Word와 같은 함수를 원할 때가 있습니다. Excel에는 이러한 기능이 포함되어 있지만 메뉴의 명령이 아닌 매크로에서 사용하도록 설계되었습니다.

범위의 셀에 텍스트를 다시 입력 할 필요없이 넓은 범위의 텍스트를 빠르게 변환하려는 경우 다음 매크로를 사용할 수 있습니다.

Sub MakeUpper()

Dim MyText As String     Dim MyRange As Range     Dim CellCount As Integer

Set MyRange = ActiveSheet.Range(ActiveWindow.Selection.Address)

For CellCount = 1 To MyRange.Cells.Count         If Not MyRange.Cells(CellCount).HasFormula Then             MyText = MyRange.Cells(CellCount).Value             MyRange.Cells(CellCount).Value = UCase(MyText)

End If     Next CellCount End Sub

이 매크로는 선택한 범위의 셀을 단계별로 실행하고 수식이 포함되지 않은 셀의 내용을 대문자로 변환합니다. UCase 함수 (매크로 하단 근처에 사용됨)를 LCase로 변경하여 소문자로 변환되도록 매크로를 쉽게 수정할 수 있습니다. 또 다른 멋진 수정은 대문자 또는 소문자 대신 제목 케이스를 사용하려는 경우입니다. (제목은 각 단어의 첫 글자 만 대문자로 표시하는 경우입니다.) 이렇게하려면 UCase (MyText)를 Application.Proper (MyText)로 바꿉니다.

_ 참고 : _

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

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

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

이 팁 (1970)은 Microsoft Excel 97, 2000, 2002 및 2003에 적용됩니다.