VBA(엑셀 매크로) 텍스트 정렬 (좌우정렬, 상하정렬)

셀 안에서 텍스트를 중앙 혹은 좌우로 정렬 해야되는 경우가 있다.

좌우 정렬에는 HorizontalAlignment

높이 정렬에는 VerticalAlignment를 사용한다.

 

사용법을 본 뒤 예제를 보도록 하겠다.

 

좌우정렬 HorizontalAlignment

좌측 정렬

Range오브젝트.HorizontalAlignment = xlLeft

 

중앙 정렬

Range오브젝트.HorizontalAlignment = xlCenter

 

우측 정렬

Range오브젝트.HorizontalAlignment = xlRight

 

Range오브젝트에 대해 궁금하다면 아래의 링크 참고

2021/01/29 - [IT 이모저모/VBA] - VBA(엑셀 매크로) 단일, 복수 셀(cell) 범위지정,선택하기(Range활용)

 

상하정렬 VerticalAlignment

상단 정렬

Range오브젝트.VerticalAlignment = xlTop

 

중단 정렬

Range오브젝트.VerticalAlignment = xlCenter

 

하단 정렬

Range오브젝트.VerticalAlignment = xlBottom

 

정렬 예제

아래의 소스는 A1은 좌측 상단 정렬B1은 상하좌우 중앙 정렬C1은 우측하단 정렬하는 소스이다.

Sub test1()
    
    Set range1 = Range("A1")
    Set range2 = Range("B1")
    Set range3 = Range("C1")
    range1.VerticalAlignment = xlTop
    range1.HorizontalAlignment = xlLeft
    
    range2.VerticalAlignment = xlCenter
    range2.HorizontalAlignment = xlCenter
    
    range3.VerticalAlignment = xlBottom
    range3.HorizontalAlignment = xlRight
    
End Sub

실행 전

실행 후