VBA UCase 기능 | Excel VBA에서 텍스트를 대문자로 변환

Excel VBA UCase 함수

VBA의 Ucase는 제공된 입력 문자열을 대문자로 변환하는 데 사용되는 내장 함수로, 문자열 인 단일 인수를 입력으로 취하고이 함수에 의해 생성 된 출력은 문자열입니다. 이 함수는 첫 번째 문자뿐만 아니라 모든 함수를 대문자로 변환합니다.

Excel에서 일부 텍스트 값을 대문자로 변환해야하는 상황이 있습니다. 이것은 일반 워크 시트 함수에서 UPPER 함수를 사용하고 VBA 코드에서 UCase 함수를 사용하여 수행 할 수 있습니다.

VBA에서 이미 UPPER 함수를 검색하고 있다면 워크 시트 함수 클래스에서도 찾을 수 없습니다. VBA에서는 "UCASE"와 같이 완전히 다른 짧은 이름 기능입니다. 여기서 "U"는 "UPPER"를 나타내므로 수식은 "UPPERCASE"로 표시됩니다.

이제 UCASE 함수의 구문을 살펴보십시오.

문자열 : 대문자로 변환하려는 텍스트 값에 불과합니다. 이것은 직접 값이거나 셀 참조 일 수도 있습니다. 잠시 후에 두 가지 예를 모두 보게 될 것입니다.

이 VBA UCase Excel 템플릿은 여기에서 다운로드 할 수 있습니다 – VBA UCase Excel 템플릿

UCase 함수를 사용하여 텍스트 값 Excel vba 를 대문자 텍스트 로 변환 해 보겠습니다 .

1 단계 : 매크로를 생성하여 하위 절차를 시작합니다.

암호:

 Sub UCase_Example1 () End Sub

2 단계 : 변수를 VBA 문자열로 선언합니다.

암호:

 Sub UCase_Example1 () Dim k As String End Sub

3 단계 : "UCASE"기능을 적용하여 변수 "k"에 값을 할당합니다.

4 단계 : 여기서 string은 대문자로 변환하려는 대상 텍스트 값이고 문자열 값은 "excel vba"입니다.

암호:

 Sub UCase_Example1 () Dim k As String K = UCase ( "excel vba") End Sub

5 단계 : 메시지 상자에 변수 결과를 표시해 보겠습니다.

암호:

 Sub UCase_Example1 () Dim k As String k = UCase ( "excel vba") MsgBox k End Sub

좋아, 우리는 VBA 코딩 부분을 마쳤습니다. 매크로를 실행하여 메시지 상자에서 결과를 확인하겠습니다.

따라서 대문자 함수는 몇 초 만에 텍스트 값 "excel vba"를 "EXCEL VBA"로 변환했습니다.

함수에 대한 셀 참조를 사용하는 예를 살펴 보겠습니다. A1 셀에 입력 한 것과 동일한 텍스트 값입니다.

1 단계 : 범위 B1 셀에 결과를 표시하므로 코드는 범위 (“B”)가됩니다. 값 =

암호:

 Sub UCase_Example2 () Range ( "B1"). Value = End Sub

2 단계 : UCASE 함수를 통해 B1 셀에 데이터를 저장하므로 UCASE 함수를 엽니 다.

3 단계 : 여기서 문자열 값은 이번에 셀 참조입니다. 따라서 셀 참조를 Range ( "A1"). Value로 지정합니다.

암호:

 Sub UCase_Example2 () Range ( "B1"). Value = UCase (Range ( "A1"). Value) End Sub

자, 끝났습니다.

코드를 실행하고 B1 셀에서 결과를 확인합니다.

위의 예에서 대문자로 변환되는 유일한 단일 셀 값을 확인했습니다. 아래 이미지와 같은 이름이 여러 개 있다고 상상해보십시오.

이러한 경우에는 모든 한 줄에 대한 코드를 계속 작성할 수 없으므로 수식을 루프로 묶어야합니다. 아래 코드는 위의 텍스트 값을 한 번에 모두 대문자로 변환합니다.

암호:

 Sub UCase_Example3 () Dim k As Long For k = 2 To 8 Cells (k, 2) .Value = UCase (Cells (k, 1) .Value) Next k End Sub

그러면 다음과 같이 모든 텍스트 값이 행 2에서 행 8까지 대문자로 변환됩니다.

선택한 모든 셀 값을 대문자로 변환하려면 아래 코드를 사용한다고 상상해보십시오.

암호:

 Sub UCase_Example4 () Dim Rng As Range Set Rng = 선택에서 각 Rng에 대한 선택 Rng = UCase (Rng.Value) Next Rng End Sub

이 코드가 작동하려면 먼저 대문자로 변환 할 셀 범위를 선택한 다음 매크로를 실행해야합니다. 선택한 범위에서만 텍스트 값을 대문자로 변환합니다.