이 기사에서는 정의 된 시간 간격 후에 다른 매크로를 호출하거나 명령을 실행하는 매크로를 생성합니다.

매크로를 실행하려면 “타이머 시작”버튼을 클릭하십시오.

ArrowStartTimer

매크로를 실행하면 “TimerMsg”매크로가 메시지 상자를 표시합니다.

ArrowStartingMessage

사용자가 “확인”버튼을 클릭하면 3 초 후 “MsgProcedure”매크로가 호출됩니다. “MsgProcedure”매크로는 메시지 상자를 표시합니다.

논리 설명

이 예에서는 두 개의 매크로 “TimerMsg”및 “MsgProcedure”를 만들었습니다. “TimerMsg”** 매크로는 정보 메시지를 표시하고 코드에 정의 된대로 3 초 동안 기다린 후 “MsgProcedure”를 호출합니다.

ArrowAfterRunningMacro

코드 설명

Application.OnTime 메서드

Application.OnTime 메서드는 정의 된 시간 간격으로 실행되도록 프로 시저를 예약하는 데 사용됩니다.

구문

Application .OnTime 시간, Procedure_name 시간은 프로 시저가 실행되어야하는 시간 간격을 지정합니다.

Procedure_name은 프로 시저의 이름을 정의합니다.

Application.onTime 메서드를 사용하여 “MsgProcedure”매크로를 예약했습니다.

아래 코드를 따르세요

Option Explicit

Sub TimerMsg()

'Declaring Date variable

Dim AlertTime As Date

'Displaying message box at the start of the timer

MsgBox "The alarm will go off in 3 seconds!"

'Setting timer time for 3 seconds after the activation time

AlertTime = Now + TimeValue("00:00:03")

'Activating the timer and running the MsgProcedure at the end of the timer

Application.OnTime AlertTime, "MsgProcedure"

End Sub

Sub MsgProcedure()

'Sample procedure created for timer example

MsgBox "Three Seconds is up!"

End Sub

이 블로그가 마음에 들면 Facebook 및 Facebook에서 친구들과 공유하십시오.

여러분의 의견을 듣고 싶습니다. 작업을 개선하고 더 나은 서비스를 제공 할 수있는 방법을 알려주십시오. [email protected]로 문의 해주세요