Monday, January 22, 2007
Excel/엑셀 VBA] 반각 문자/ 전각 문자 변환; Half-Width Full-Width Char Convert
반각 문자와 전각 문자를 상호 변환하는 방법입니다. 한글에서는 영문과 숫자를 모두 반각으로 사용하지만, 특수한 경우에는 가끔 전각을 쓸 때도 있습니다.
StrConv() 함수를 사용합니다.
(엑셀에서 Alt+F11키를 눌러, 비베 에디터를 실행하고, 비베 에디터 메뉴의, "삽입 > 모듈"을 선택한 후, 다음 코드를 붙여 넣습니다.)
비베 에디터에서 F5 키를 누르거나, 엑셀에서 Alt+F8 키를 누르면 VBA 매크로가 실행됩니다.
한글이나 한자처럼 원래 2바이트(전각)일 수밖에 없는 문자는 변환되지 않고 항상 그대로입니다.
전각/반각 의미: ▶▶ 컴퓨터용어] 반각 문자 / 전각 문자;(半角/全角)의 의미, 차이점- Half-Width / Full-Width Character
전각 문자표: ▶▶ 전각 문자표] 전각 숫자, 전각 영문 알파벳 문자, 전각 기호 ; Full Width ASCII Characters; 2 Bytes
StrConv() 함수를 사용합니다.
반각을 전각으로, 전각을 반각으로 변경 예제
(엑셀에서 Alt+F11키를 눌러, 비베 에디터를 실행하고, 비베 에디터 메뉴의, "삽입 > 모듈"을 선택한 후, 다음 코드를 붙여 넣습니다.)
비베 에디터에서 F5 키를 누르거나, 엑셀에서 Alt+F8 키를 누르면 VBA 매크로가 실행됩니다.
Sub Half_Full_Width_Example()
Dim h, f
''''''''''''''''''''''''''''''''''''''''''''''''''''
' 알파벳과 기호/공백은 반각 문자 (1바이트)
h = "AAA 국가 國家 !@#$%^&*()"
''''''''''''''''''''''''''''''''''''''''''''''''''''
' 모두 전각 문자 (2바이트) / 공백문자까지 전각임
f = "ＡＡＡ 국가 國家 ！＠＃＄％＾＆＊（）"
' 반각 문자를 전각 문자로 변환
MsgBox StrConv(h, vbWide)
' 출력 결과: ＡＡＡ 국가 國家 ！＠＃＄％＾＆＊（）
' 전각 문자를 반각 문자로 변환
MsgBox StrConv(f, vbNarrow)
' 출력 결과: AAA 국가 國家 !@#$%^&*()
End Sub
Dim h, f
''''''''''''''''''''''''''''''''''''''''''''''''''''
' 알파벳과 기호/공백은 반각 문자 (1바이트)
h = "AAA 국가 國家 !@#$%^&*()"
''''''''''''''''''''''''''''''''''''''''''''''''''''
' 모두 전각 문자 (2바이트) / 공백문자까지 전각임
f = "ＡＡＡ 국가 國家 ！＠＃＄％＾＆＊（）"
' 반각 문자를 전각 문자로 변환
MsgBox StrConv(h, vbWide)
' 출력 결과: ＡＡＡ 국가 國家 ！＠＃＄％＾＆＊（）
' 전각 문자를 반각 문자로 변환
MsgBox StrConv(f, vbNarrow)
' 출력 결과: AAA 국가 國家 !@#$%^&*()
End Sub
한글이나 한자처럼 원래 2바이트(전각)일 수밖에 없는 문자는 변환되지 않고 항상 그대로입니다.
전각/반각 의미: ▶▶ 컴퓨터용어] 반각 문자 / 전각 문자;(半角/全角)의 의미, 차이점- Half-Width / Full-Width Character
전각 문자표: ▶▶ 전각 문자표] 전각 숫자, 전각 영문 알파벳 문자, 전각 기호 ; Full Width ASCII Characters; 2 Bytes
tag: office
엑셀 Excel | 워드 Word | VBA 매크로 | 오피스
<< Home