Note: The other languages of the website are Google-translated. Back to English

Excel 워크 시트에서 스톱워치를 만드는 방법은 무엇입니까?

워크 시트에 스톱워치가 있으면 작업 완료 시간을 알 수 있습니다. 다음 스크린 샷과 같이 시작, 중지 및 재설정 단추가있는 시트에 스톱워치를 어떻게 만들 수 있습니까? 시작 버튼을 클릭하면 시간이 시작되고, 중지 버튼을 클릭하면 시간이 중지되며, 재설정 버튼을 사용하면 시간을 재설정 할 수 있습니다. 이 기사에서는 Excel에서 간단하고 편리한 스톱워치를 만드는 방법에 대해 설명합니다.

문서는 스톱워치를 만들 1

VBA 코드를 사용하여 세 개의 버튼이있는 스톱워치 만들기


VBA 코드를 사용하여 세 개의 버튼이있는 스톱워치 만들기

시작, 중지 및 재설정의 세 개의 버튼이있는 스톱워치를 만들려면 다음 단계를 하나씩 수행하십시오.

먼저 세 개의 명령 단추를 삽입하십시오.

1. 딸깍 하는 소리 개발자 > 끼워 넣다 > 명령 단추, 스크린 샷 참조 :

문서는 스톱워치를 만들 2

2. 그런 다음 마우스를 드래그하여 버튼을 그립니다. 버튼을 삽입 한 후 버튼 캡션을 변경할 수 있습니다. 개발자 > 등록,에 등록 대화 상자에 새 캡션을 입력하십시오.“스타트”옆의 텍스트 상자에있는이 버튼 표제, 스크린 샷 참조 :

문서는 스톱워치를 만들 3 2 문서는 스톱워치를 만들 4

3. 위의 두 단계를 반복하여 다른 두 개의 버튼을 삽입하고 "중지"및"다시 쓰기”, 스크린 샷 참조 :

문서는 스톱워치를 만들 5

4. 버튼을 삽입 한 후 버튼을 클릭하여 디자인 모드를 종료해야합니다. 개발자 > 디자인 모드.

둘째, VBA 코드를 만듭니다.

5. 그런 다음 현재 워크 시트 탭을 마우스 오른쪽 단추로 클릭하고 코드보기, 튀어 나온 응용 프로그램 용 Microsoft Visual Basic 창에 다음 코드를 복사하여 붙여 넣으십시오. 시트 코드:

VBA 코드 : 스톱워치 만들기 :

Public StopIt As Boolean
Public ResetIt As Boolean
Public LastTime
Private Sub CommandButton1_Click()
Dim StartTime, FinishTime, TotalTime, PauseTime
StopIt = False
ResetIt = False
If Range("C2") = 0 Then
  StartTime = Timer
  PauseTime = 0
  LastTime = 0
Else
  StartTime = 0
  PauseTime = Timer
End If
StartIt:
  DoEvents
  If StopIt = True Then
    LastTime = TotalTime
    Exit Sub
  Else
    FinishTime = Timer
    TotalTime = FinishTime - StartTime + LastTime - PauseTime
    TTime = TotalTime * 100
    HM = TTime Mod 100
    TTime = TTime \ 100
    hh = TTime \ 3600
    TTime = TTime Mod 3600
    MM = TTime \ 60
    SS = TTime Mod 60
    Range("C2").Value = Format(hh, "00") & ":" & Format(MM, "00") & ":" & Format(SS, "00") & "." & Format(HM, "00")
    If ResetIt = True Then
      Range("C2") = Format(0, "00") & ":" & Format(0, "00") & ":" & Format(0, "00") & "." & Format(0, "00")
      LastTime = 0
      PauseTime = 0
      End
    End If
    GoTo StartIt
  End If
End Sub
Private Sub CommandButton2_MouseDown(ByVal Button As Integer, ByVal Shift As Integer, ByVal X As Single, ByVal Y As Single)
  StopIt = True
End Sub
Private Sub CommandButton3_Click()
  Range("C2").Value = Format(0, "00") & ":" & Format(0, "00") & ":" & Format(0, "00") & "." & Format(0, "00")
  LastTime = 0
  ResetIt = True
End Sub

문서는 스톱워치를 만들 6

주의 사항: 위 코드에서 C2 스톱워치 시간이 삽입 될 셀이며 커맨드 버튼1, 커맨드 버튼2, 커맨드 버튼3 버튼 이름입니다. 정확한 버튼 이름은 이름 상자, 스크린 샷 참조 :

문서는 스톱워치를 만들 7

셋째, 스톱워치 시간 셀의 형식을 지정합니다.

6. 그런 다음 시간 셀을 다음과 같이 형식화해야합니다. 본문 형식, 필요에 따라 셀 크기, 글꼴, 글꼴 색상, 배경 등을 변경할 수 있습니다. 스크린 샷을 참조하십시오.

문서는 스톱워치를 만들 8

7. 위의 단계를 마친 후 지금부터 스타트 버튼을 누르면 시간이 시작됩니다. 중지 버튼을 누르면 시간이 중지됩니다. 다시 쓰기 버튼은 시간을 재설정합니다. 스크린 샷 참조 :

문서는 스톱워치를 만들 9


데모 : VBA 코드를 사용하여 세 개의 버튼이있는 스톱워치 만들기


최고의 사무 생산성 도구

Excel용 Kutools는 대부분의 문제를 해결하고 생산성을 80% 증가시킵니다.

  • 재사용: 빠르게 삽입 복잡한 공식, 차트 그리고 이전에 사용한 모든 것; 셀 암호화 암호로; 메일 링리스트 생성 이메일 보내기 ...
  • 슈퍼 포뮬러 바 (여러 줄의 텍스트와 수식을 쉽게 편집 할 수 있습니다.) 레이아웃 읽기 (많은 수의 셀을 쉽게 읽고 편집합니다.) 필터링 된 범위에 붙여 넣기...
  • 셀 / 행 / 열 병합 데이터 손실없이; 셀 내용 분할; 중복 행 / 열 결합... 중복 셀 방지; 범위 비교...
  • 중복 또는 고유 선택 행; 빈 행 선택 (모든 셀이 비어 있음); 슈퍼 찾기 및 퍼지 찾기 많은 통합 문서에서; 무작위 선택 ...
  • 정확한 사본 수식 참조를 변경하지 않고 여러 셀; 참조 자동 생성 여러 시트에; 글 머리 기호 삽입, 확인란 등 ...
  • 텍스트 추출, 텍스트 추가, 위치 별 제거, 공간 제거; 페이징 부분합을 만들고 인쇄합니다. 셀 내용과 주석 간 변환...
  • 슈퍼 필터 (다른 시트에 필터 구성표 저장 및 적용) 고급 정렬 월 / 주 / 일, 빈도 등 특수 필터 굵은 기울임 꼴로 ...
  • 통합 문서와 워크 시트 결합; 키 열을 기반으로 테이블 병합; 데이터를 여러 시트로 분할; xls, xlsx 및 PDF 일괄 변환...
  • 300개 이상의 강력한 기능. Office / Excel 2007-2021 및 365를 지원합니다. 모든 언어를 지원합니다. 기업 또는 조직에서 쉽게 배포할 수 있습니다. 전체 기능은 30일 무료 평가판입니다. 60일 환불 보장.
kte 탭 201905

Office Tab은 Office에 탭 인터페이스를 제공하여 작업을 훨씬 쉽게 만듭니다.

  • Word, Excel, PowerPoint에서 탭 편집 및 읽기 사용, Publisher, Access, Visio 및 Project.
  • 새 창이 아닌 동일한 창의 새 탭에서 여러 문서를 열고 만듭니다.
  • 생산성을 50% 높이고 매일 수백 번의 마우스 클릭을 줄입니다!
officetab 하단
코멘트 (32)
아직 평가가 없습니다. 가장 먼저 평가하세요!
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
이 게시물을 주셔서 감사합니다, 그것은 매우 도움이되었습니다. 그러나 셀을 편집할 때 타이머가 멈추지 않도록 코드를 조정하는 방법이 있습니까? 이상적으로는 "시작"을 누르고 동일한 탭의 셀 범위를 여러 번 변경한 다음 경과된 총 시간 동안 "중지"를 누르고 싶습니다. 이에 대한 조언을 주시면 대단히 감사하겠습니다!
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
이것을 알아 낸 적이 있습니까? 나도 같은 스프레드시트에서 다른 변경 사항이 적용되는 동안 타이머를 계속 실행해야 합니다. 감사해요. 마이크
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
이것은 큰 도움이 되었고 매우 쉽게 단계를 따를 수 있었습니다.
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
Forms에서 동일한 코드를 사용하여 스톱워치를 만들려고 했습니다. 타이머는 완벽하게 시작되지만 멈추지는 않습니다. 양식에서 동일한 것을 복제하는 방법을 제안하십시오
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
XNote 스톱워치를 사용해 보세요.
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
타이머가 특정 시간까지 카운트 업 또는 다운하도록 하는 방법이 있습니까? 시작, 중지 및 재설정 버튼을 유지하고 싶지만 시작을 누르면 최대 01분 01초만 계산해야 합니다. 또는 XNUMX분 XNUMX초에서 XNUMX(XNUMX:XNUMX)까지 카운트다운합니다. 당신의 도움을 주셔서 감사합니다!
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
안녕, 멜리사
워크시트에서 카운트다운 타이머를 만들어야 하는 경우 다음 문서가 도움이 될 수 있습니다.
https://www.extendoffice.com/documents/excel/2144-excel-countdown-timer.html
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
안녕하세요,

나는 그 기사를 보았지만 이 페이지의 스톱워치와 정확히 같아야 하지만 XNUMX분 XNUMX초만 카운트다운하려면 필요합니다. 스톱워치 형식으로 표시해야 하지만 카운트다운으로 작동합니다. 추가 조언이 있습니까?


답장해주셔서 감사합니다!
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
엑셀로 디자인한 스코어보드용입니다.
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
좋습니다. 하지만 같은 시트에서 2개의 시계를 실행할 수 있습니까? 새로운 시작, 중지 및 재설정 버튼으로 두 번째 시계를 만들었지 만 두 번째 시계를 시작하면 첫 번째 시계가 멈 춥니 다....
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
같은 여기에서 당신은 이것의 치료법을 찾을 수 있습니다
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
안녕하세요 친구,
이 방법은 워크시트에 있는 하나의 단추 집합에만 적용됩니다.
다른 좋은 아이디어가 있으면 여기에 댓글을 달아주세요.
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
화면이 잠길 때 타이머를 자동으로 중지하고 컴퓨터를 잠금 해제할 때 타이머를 자동으로 시작할 수 있습니까?
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
타이머가 카운트를 XNUMX으로 재설정하지만 여전히 타이머를 계속 실행하게 하는 방법이 있습니까? 즉. 재설정을 누를 때 시간이 표시될 때까지 시작을 다시 누르고 싶지 않습니다.
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
안녕하세요, 저는 이 스토퍼를 사용하고 있지만 디스플레이 셀("C2")의 숫자가 튀어나오기 시작하고 꺼지는 경우가 많습니다. 마이너스 기호가 표시되고 숫자가 정확하지 않고 카운트가 손실됩니다. 일반적으로 약 한 시간 이상 후에 발생하지만 때로는 한 시간이 지나기 전에 발생합니다. 이것은 일반적인 버그입니까? 그렇다면 고칠 방법이 있습니까? 나는 단순히 "."를 지워 코드에서 .00(즉, 밀리초)을 제거했습니다. & Format(0, "00") 라인이 나타날 때마다 - 이것이 이 문제와 관련이 있습니까?
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
팁 감사합니다. 원활하게 실행되고 있었지만 이 시트에 데이터를 입력하면 실행이 중지되었습니다. 데이터를 입력하는 동안 계속 실행해야 합니다. 이 문제를 해결하려면 어떻게 해야 합니까?
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
안녕, 노은
문제를 해결하는 데 좋지 않을 수 있습니다. 셀을 편집하면 현재 실행 중인 매크로가 중단됩니다.
다른 좋은 방법이 있다면 여기에 댓글을 달아주세요!
감사합니다!
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
안녕하세요. 스톱워치를 만들었지만 시간 및 모션 연구로 반영할 수 있도록 저장하려면 시작과 중지 사이의 다양한 간격을 가질 수 있어야 합니다. 그 방법에 대한 팁이 있습니까?
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
모든 단계를 완료했지만 시작 단추를 클릭하면 "매크로 "'file.xlsm'! CommandButton1"을 실행할 수 없습니다. 이 통합 문서에서 매크로를 사용할 수 없거나 모든 매크로가 비활성화되었을 수 있습니다."라는 오류 메시지가 표시됩니다. 모든 매크로가 활성화되었으며 매크로는 Module1에 있습니다. 참고: Mac용 Office 2019를 실행 중이므로 문제가 될 수 있습니다....
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
이 코드에 "+10s" 및 "2x Speed" 기능을 추가하는 것은 어떻습니까?
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
여기서 '타이머'는 변수입니까? 코드에서 관련성을 보지 마십시오.
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
카운터가 초만 계산하도록 할 수 있습니까?
그래서 59초에 도달하면 60, 61, 62, 63 ....
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
안녕하세요
단계를 수행했지만 타이머 셀에 나타날 시간을 얻을 수 없습니다. 코드를 복사했지만 확인할 수 있습니까?1. 줄 번호가 필요하지 않거나 2입니다. sheet1 또는 This workbook1이 아닌 모듈 3에 코드를 넣었습니다. 이 모든 작업을 수행한 후 매크로 목록에 매크로가 나열되어야 합니다.
감사
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
안녕, Janice, 5단계에서 활성 시트 모듈에 코드를 넣어야 합니다.
5. 그런 다음 현재 워크시트 탭을 마우스 오른쪽 버튼으로 클릭하고 코드 보기를 선택합니다. 팝업된 Microsoft Visual Basic for Applications 창에서 다음 코드를 복사하여 모듈에 붙여넣습니다.

그리고 버튼 이름을 자신의 것으로 변경해야 합니다.
참고: 위의 코드에서 C2는 스톱워치 시간이 삽입될 셀이고 커맨드 버튼1, 커맨드 버튼2, 커맨드 버튼3 버튼 이름은 이름 상자에서 정확한 버튼 이름을 볼 수 있습니다.

확인해 주세요. 감사합니다!
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
이것은 훌륭합니다! 감사합니다, Chris H
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
콤보 상자 또는 드롭다운 선택을 사용하여 시계를 시작 및 중지할 수 있습니까?
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
Bonjour, j'ai voulu intégrer ce chronomètre à une autre macro, determiner le temps d'utilisation du fichier. La macro se lance mais bloque l'utilisation du fichier.Comment Faire pour utiliser votre chronomètre en meme temps que d'autres code VBA?MerciHenry.
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
안녕! 감사합니다. 후속 셀에 시간을 채우려면 어떻게 해야 합니까? 셀 C2의 시작/중지 시간, 셀 c3, c4, c5 등의 다른 시작/중지 시간 
아직 코멘트가 없습니다
더보기
여러분의 의견을 남겨
게스트로 게시
×
이 게시물 평가 :
0   등장 인물
추천 위치

Follow Us

저작권 © 2009 - WWW.extendoffice.com. | 판권 소유. 에 의해 구동 ExtendOffice. | | 사이트 맵
Microsoft 및 Office 로고는 미국 및 / 또는 기타 국가에서 Microsoft Corporation의 상표 또는 등록 상표입니다.
Sectigo SSL로 보호