지난 번에 실시간으로 D-Day를 표시하는 것과 비슷한 '남은 시간 카운터'입니다.새로운 해가 가까이 다가오는 이 시점에서 새해맞이 카운터를 만들었습니다.요즘 같은 시기 다른 이벤트가 있을 때도 타이머를 만들 때 유용하겠습니다. 1슬라이드에는 Timer 와 Clock 이라는 텍스트상자를 삽입합니다.도형 이름으로 도형을 찾아가기 때문에 Alt+F10 창에서 도형 이름을 정확히 입력해야 합니다. VBA코드를 Module1에 넣습니다. 더보기Option Explicit#If VBA7 Then Declare PtrSafe Function SetTimer Lib "user32" (ByVal hwnd As LongPtr, ByVal nIDEvent As LongPtr, _ ByVal uElaps..
Timer 검색 결과
오디오를 MCISendString API를 이용해서 재생/일시정지/재시작/정지할 수 있습니다. 여기서 재생위치를 실시간으로 Timer API를 이용해서 표시하는 예시입니다. MCISendString 명령어 목록: https://docs.microsoft.com/en-us/windows/win32/multimedia/multimedia-command-strings?redirectedfrom=MSDN 실행 영상: 코드 보기: 더보기 Option Explicit #If VBA7 Then Public Declare PtrSafe Function SetTimer Lib "user32" (ByVal hwnd As LongPtr, ByVal nIDEvent As LongPtr, _ ByVal uElapse As Lo..
상단에는 시계가 돌아가고 Start 를 누르면 타이머(스톱워치)가 작동하고 Record 를 누를 때마다 현재 시간을 기록하고 누적합니다. 타이머 시간을 누르면 잠시 일시정지 혹은 재시작합니다. Reset 을 누르면 초기화 합니다. 누적 된 타이머 기록은 타이머 아래 텍스트 상자에 쌓이게 됩니다. 더보기 Option Explicit #If VBA7 Then Declare PtrSafe Function SetTimer Lib "user32" (ByVal hwnd As LongPtr, ByVal nIDEvent As LongPtr, _ ByVal uElapse As Long, ByVal lpTimerFunc As LongPtr) As LongPtr Declare PtrSafe Function KillTimer..
VBA를 이용한 Powerpoint 타이머입니다. 게임할 때, 시험볼 때나 제한 시간을 줄 때 유용합니다. 지정된 시간에서 카운트 다운하다가 00:00:00에 멈춥니다. 제일 상단에는 현재 시간이 표시되고 맨아래의 눈금은 진행 상태바라고 볼 수 있습니다. 노란색으로 점점 채워집니다. 우측 상단 톱니바퀴 아이콘을 누르면 제한시간을 지정할 수 있습니다. 최대 23:59:59 까지 지정할 수 있습니다. hh:mm:ss 형식이 맞지 않으면 동작하지 않습니다. 카운트 도중 타이머숫자나 왼쪽 상단 아이콘을 누르면 일시정지/재시작합니다. TV나 빔프로젝터 환경에 따라 16:9와 4:3 버전으로 나눴습니다. 16:9화면 버전 4:3화면 버전 ***** 00:00:00가 되면 다시 카운트를 증가시키는 버전 16:9화면 ..
최근댓글