with 문으로 개체 참조 생략하기

With .... End with 문은 두 가지 효과가 있다.

1. 코드 단순화

2. 실행속도 향상

[일반 사용 시]

Range("A1:D5").Font.Size = 12

Range("A1:D5").Font.Bold = True

Range("A1:D5").HorizontalAlignment = xlCenter

Range("A1:D5").Style = "Percent"

[With... End with 사용 시]

With Range("A1:D5")

.Font.Size=12

.Font.Bold=True

.HorizontalAlignment = xlCenter

.Style = "Percent"

End With

위의 작업 결과는 동일하다.