VBA Case 함수 – 대문자, 소문자, 단어의 첫 글자만 대문자로 변환하기

이 튜토리얼에서는 VBA에서 UCASE, LCASE 및 STRCONV 함수를 사용하는 방법을 설명합니다.

VBA에서 작업하면서 문자열을 소문자, 대문자 또는 각 단어의 첫 글자만 대문자로 변환해야 하는 경우가 종종 있습니다. 이는 UCase, LCase 및 StrConv 함수를 사용하면 가능합니다.

VBA는 대소문자를 구분하므로 이러한 함수는 VBA에서 문자열을 조작할 때 중요합니다. VBA를 대소문자를 구분하지 않게 만들려면 모듈 상단에 Option Compare Text를 추가해야 합니다. 이에 대한 자세한 내용은 여기에서 확인할 수 있습니다: VBA 대소문자 구분 방지

UCase – 문자열을 대문자로 변환하는 함수

VBA의 UCase 함수는 모든 문자를 대문자로 변환합니다. 인수는 문자열, 문자열이 포함된 변수 또는 셀 값일 수 있고 하나의 인수만 있습니다. 이 함수는 두 문자열을 비교하려는 경우에 자주 사용됩니다. 다음은 UCase 함수를 사용한 예제 코드입니다:

Dim strText As String
Dim strTextUCase As String

strText = "running Uppercase function"

strTextUCase = UCase(strText)

MsgBox strTextUCase

이 예제에서는 strText 변수의 모든 문자를 대문자로 변환하고 변환된 문자열을 strTextUCase 변수에 할당합니다. 변환된 문자열을 메시지 박스에 표시합니다:

LCase – 문자열을 소문자로 변환하는 함수

문자열의 모든 문자를 소문자로 변환하려면 LCase 함수를 사용해야 합니다. 이 함수에는 UCase와 동일하게 하나의 인수만 있습니다. 인수는 문자열, 문자열이 포함된 변수 또는 셀 값일 수 있습니다. 다음은 LCase 함수에 대한 예제 코드입니다:

Dim strText As String
Dim strTextLCase As String

strText = "RUNNING lowerCASE FUNCTION"

strTextLCase = LCase(strText)

MsgBox strTextLCase

 

이 예제에서는 문자열 변수 strText의 모든 문자를 소문자로 변환합니다. 그런 다음 변환된 문자열을 변수 strTextLCase에 할당합니다.

StrConv – 단어의 첫 글자만 대문자로 변환하는 함수

StrConv 함수를 사용하면 텍스트 문자열을 단어의 첫 글자만 대문자로 변환할 수 있습니다. 이 함수에는 두 개의 인수가 있습니다. 첫 번째는 변환하려는 문자열입니다. 두 번째는 원하는 변환 유형입니다. 문자열을 단어의 첫 글자만 대문자로 변환하려면 vbProperCase로 설정해야 합니다. 코드 예제는 다음과 같습니다:

Dim strText As String
Dim strTextProperCase As String
    
strText = "running proper case function"
    
strTextProperCase = StrConv(strText, vbProperCase)
    
MsgBox strTextProperCase

이 예제에서는 strText 변수의 문자열 중 각 단어의 첫 글자를 대문자로 변환하고 변환된 문자열을 strTextProperCase 변수에 할당합니다. 변환된 문자열을 메시지 박스에 표시합니다:

StrConv – 문자열을 대문자 또는 소문자로 변환하기

StrConv 함수를 사용하면 문자열을 대문자 또는 소문자로 변환할 수도 있습니다. 이렇게 하려면 두 번째 인수를 vbUpperCase (대문자) 또는 vbLowerCase(소문자)로 설정하기만 하면 됩니다:

strTextConverted = StrConv(strText, vbUpperCase)

strTextConverted = StrConv(strText, vbLowerCase)

Access VBA에서 Case 함수 사용하기 – 대문자, 소문자, 단어의 첫 글자만 대문자로 변환하기

위의 모든 예제는 Excel VBA에서와 마찬가지로 Access VBA에서도 똑같이 작동합니다.

Private Sub ClientName_AfterUpdate()
   'this will convert the text in the client name box to uppercase
   Me.ClientName = UCase(Me.ClientName)
End Sub