Excel에서 타이머를 어떻게 만들 수 있는지 궁금 하신가요?

30 초에서 0 초 사이의 카운트 다운이 상태 표시 줄에 표시됩니다.

답변 :

표준 모듈에 다음 코드를 삽입하십시오.

Sub CountDown()

Dim intCounter As Integer

Dim bln As Boolean

bln = Application.DisplayStatusBar

Application.DisplayStatusBar = True

For intCounter = 30 To 1 Step -1

Application.StatusBar = intCounter & " Seconds..."

Application.Wait Now + TimeSerial(0, 0, 1)

Next intCounter

Application.StatusBar = False

Application.DisplayStatusBar = bln

End Sub

In this way you can use status bar to display excel vba timer.