Please Enable JavaScript!
Gon[ Enable JavaScript ]

엑셀 VBA 메시지박스 (MsgBox) 에 문자열 줄 바꿈을 적용하는 방법

엑셀(Excel)/VBA
반응형

프로그램에서 개행 문자에는 Carriage Return(CR) , Line Feed(LF) 두 가지가 있습니다. 개행 문자란 텍스트의 한 줄이 끝났다는 것을 표시하는 용도입니다. 보통 줄바꿈 문자, 새 줄 문자라고도 합니다. 보통은 텍스트 줄 바꿈으로 표현할 때 \n\r 을 넣습니다. 그럼 VBA 에서는 어떻게 표현할까요? VBA 에서는 상수 값인 vbCrLf 로 표현하거나  chr(13) &  chr(10) 을 입력하면 해결이 됩니다.

 

 

줄 바꿈을 표현하자면 문자열과 기호, 상수를 합쳐야 합니다. 문자열과 기호를 합치는 것은 &(앰퍼센트) 입니다. 앰퍼센트를 이용해서 줄 바꿈을 위한 두 가지 표현식 중 하나인 Chr() 함수 문자열과 합치면 됩니다. Carriage Return 의 아스키값은 13 이며 chr(10) Linefeed Character 입니다. chr() 함수에 각 숫자를 넣고 문자열과 합치면 줄 바꿈이 되는 것입니다. 참고로 그 반대의 함수가 Asc() 입니다. 인수로 문자를 넣으면 아스키 코드 값을 반환하게 됩니다. 두 번째 줄 바꿈 방법은 vbCrLf 상수 값으로 개행문자를 표현하는 상수 값으로 다음과 같은 것들이 있습니다.

 

엑셀 VBA 메시지박스 (MsgBox) 에 문자열 줄 바꿈을 적용하는 방법

 

아래에 소스처럼 두 가지 방식으로 줄 바꿈을 표현 했습니다. 상수 값을 사용하는 것이 훨씬 간단하죠. 아래 소스를 실행하시면 메시지 박스에 내용이 두 줄로 표현되는 것을 확인할 수 있습니다.

 

Sub MsgboxCarriageReturn()
   
    Msgbox "첫 번째 줄 표현하기 " & Chr(13) & chr(10) & "두 번째 줄 표현하기"    Msgbox "첫 번째 줄 표현하기 " & vbCrLf & "두 번째 줄 표현하기"   
End Sub

 

엑셀 VBA 메시지박스 (MsgBox) 에 문자열 줄 바꿈을 적용하는 방법

 ※ 아래는 참고하면 좋을 만한 글들의 링크를 모아둔 것입니다.
엑셀 VBA 연산자 사용해서 String 문자열을 합치기
엑셀(Excel) - VBA 숫자를 문자로 변환하는 방법
엑셀 VBA 문자열 글자 하나씩 추출하기
엑셀 VBA 주민번호, 이메일 문자열 잘라 내는 방법
셀 VBA 문자열 자르기, LEFT RIGHT 함수를 이용해 문자열 추출하기
반응형
Posted by 녹두장군

댓글을 달아 주세요