Vba에서 문자열을 뒤집는 방법(예제 포함)
VBA에서 StrReverse 함수를 사용하여 텍스트 문자열을 반전할 수 있습니다.
실제로 이 기능을 사용하는 일반적인 방법은 다음과 같습니다.
SubReverseStrings ()
Dim i As Integer
For i = 2 To 11
Range("B" & i) = StrReverse(Range("A" & i))
Next i
End Sub
이 특정 예에서는 A2:A11 범위의 각 문자열을 반전시키고 B2:B11 범위의 결과를 표시합니다.
다음 예에서는 실제로 이 구문을 사용하는 방법을 보여줍니다.
예: VBA를 사용하여 문자열을 뒤집는 방법
Excel에 다음과 같은 농구 팀 이름 열이 있다고 가정합니다.
각 팀의 이름을 바꾸고 B열의 해당 셀에 결과를 표시한다고 가정해 보겠습니다.
이를 위해 다음 매크로를 생성할 수 있습니다:
SubReverseStrings ()
Dim i As Integer
For i = 2 To 11
Range("B" & i) = StrReverse(Range("A" & i))
Next i
End Sub
이 매크로를 실행하면 다음과 같은 출력이 나타납니다.
B열에는 A열의 각 팀 이름이 거꾸로 표시됩니다.
예를 들어:
- Mavs는 svaM 이 됩니다
- 스퍼스는 SrupS 가 됩니다
- 로켓은 stekcoR 이 됩니다.
- 킹스가 sgniK 가 되다
등등.
StrReverse 함수는 숫자에도 작동합니다.
예를 들어, StrReverse 함수를 숫자 1234 에 적용하면 4321이 반환됩니다.
추가 리소스
다음 자습서에서는 VBA에서 다른 일반적인 작업을 수행하는 방법을 설명합니다.
VBA:문자열에 다른 문자열이 포함되어 있는지 확인하는 방법
VBA:범위 내 행 수를 계산하는 방법
VBA: COUNTIF 및 COUNTIFS 함수 작성 방법