Monday, December 18, 2006
엑셀/Excel] 문자열 순서 반전, 문자 거꾸로 뒤집기 함수; VBA매크로, Reverse String
VBA.StrReverse() 함수로 문자열 순서를 거꾸로 반전시킬 수 있습니다.
(엑셀에서 Alt+F11키를 눌러, 비베 에디터를 실행하고, 비베 에디터 메뉴의, "삽입 > 모듈"을 선택한 후, 다음 코드를 붙여 넣습니다.)
엑셀의 가장 첫번째 셀(Cell)인 A1 셀에,
ABCD
라고 입력하고
바로 옆의 셀인 B1 셀에
=reverseString(A1)
이렇게 입력하고, Enter키를 치면, B1 셀의 값이
DCBA
이렇게 됩니다. A1셀의 ABCD 가 거꾸로 반전된 것입니다.
이제 다시 첫번째 셀인 A1셀에
홍길동
이라고 쓰고 엔터(Enter)키를 치면
B1셀에는
동길홍
이라고 거꾸로 반전되어 나옵니다.
그렇지만 "소주 만병만 주소" 라고 입력하면, 여전히 "소주 만병만 주소" 가 됩니다.
"소주 만병만 주소" 는 회문(回文; Palindrome)이기 때문에 뒤집어도 "소주 만병만 주소"가 나옵니다.
문자열 순서 거꾸로 역전시키기 예제; Reverse String Example
(엑셀에서 Alt+F11키를 눌러, 비베 에디터를 실행하고, 비베 에디터 메뉴의, "삽입 > 모듈"을 선택한 후, 다음 코드를 붙여 넣습니다.)
Function reverseString(s As String) As String
reverseString = VBA.StrReverse(s)
End Function
reverseString = VBA.StrReverse(s)
End Function
엑셀의 가장 첫번째 셀(Cell)인 A1 셀에,
ABCD
라고 입력하고
바로 옆의 셀인 B1 셀에
=reverseString(A1)
이렇게 입력하고, Enter키를 치면, B1 셀의 값이
DCBA
이렇게 됩니다. A1셀의 ABCD 가 거꾸로 반전된 것입니다.
이제 다시 첫번째 셀인 A1셀에
홍길동
이라고 쓰고 엔터(Enter)키를 치면
B1셀에는
동길홍
이라고 거꾸로 반전되어 나옵니다.
그렇지만 "소주 만병만 주소" 라고 입력하면, 여전히 "소주 만병만 주소" 가 됩니다.
"소주 만병만 주소" 는 회문(回文; Palindrome)이기 때문에 뒤집어도 "소주 만병만 주소"가 나옵니다.
tag: office
엑셀 Excel | 워드 Word | VBA 매크로 | 오피스
<< Home