엑셀 VBA에서 응용 프로그램 객체의 상태 표시 속성은 긴 매크로의 진행 상황을 표시하는 데 사용할 수 있습니다. 이렇게하면 매크로가 여전히 실행되고있는 사용자 노하우를하도록 할 수 있습니다.

상황 :

임의의 숫자와 함께 : ( “E20 A1”) 우리가 만들려고 매크로 범위를 채 웁니다.

Excel VBA StatusBar Property Example

명령 단추에 다음 코드 줄을 추가합니다

  1. 먼저, 우리 형 정수라는 I, J 및 pctCompl 세 변수를 선언.

Dim i As Integer, j As Integer, pctCompl As Integer

더블 루프를 추가합니다.

For i = 1 To 20

For j = 1 To 5

Next j

Next i

루프에 (3, 4, 5에서) 다음 코드 줄을 추가합니다.

  1. RANDBETWEEN 함수는 20에서 100 사이의 임의의 숫자를 가져

Cells(i, j).Value = WorksheetFunction.RandBetween(20, 100)

  1. 초기화 변수 pctCompl. 번째 코드 라인은 가변 pctCompl 및 상태 막대 일부 설명 텍스트의 값을 기록한다.

pctCompl = (i - 1)  5 + (j  1)

Application.StatusBar = "Importing Data.. " & pctCompl & "% Completed"

예 : I 3, J = 1, (3 1 -) = 5 + (1)이 11 %가 완료된 =.

  1. 우리는 긴 매크로를 시뮬레이션하기 위해 Application 개체의 대기 방법을 사용합니다.

Application.Wait Now + TimeValue("00:00:01")

  1. 기본 상태 표시 줄 텍스트를 복원하려면 (루프 외부) False로 상태 표시 속성을 설정합니다.

Application.StatusBar = False

당신이 시트에 명령 단추를 클릭하면 검색 결과 :

Excel VBA StatusBar Property Result

참고 : 수매크로 인터럽트 / VBA – 예 인터럽트-A-매크로Esc 키 또는 Ctrl + Break를 눌러 언제든지. 보다 시각적 접근을 위해, 우리 ‘링크를 참조 / VBA를 예로 진행 표시기 [진행 표시기]’프로그램.