Excel 워크 시트에서 스톱워치를 만드는 방법은 무엇입니까?
워크 시트에 스톱워치가 있으면 작업 완료 시간을 알 수 있습니다. 다음 스크린 샷과 같이 시작, 중지 및 재설정 단추가있는 시트에 스톱워치를 어떻게 만들 수 있습니까? 시작 버튼을 클릭하면 시간이 시작되고, 중지 버튼을 클릭하면 시간이 중지되며, 재설정 버튼을 사용하면 시간을 재설정 할 수 있습니다. 이 기사에서는 Excel에서 간단하고 편리한 스톱워치를 만드는 방법에 대해 설명합니다.
VBA 코드를 사용하여 세 개의 버튼이있는 스톱워치 만들기
VBA 코드를 사용하여 세 개의 버튼이있는 스톱워치 만들기
시작, 중지 및 재설정의 세 개의 버튼이있는 스톱워치를 만들려면 다음 단계를 하나씩 수행하십시오.
먼저 세 개의 명령 단추를 삽입하십시오.
1. 딸깍 하는 소리 개발자 > 끼워 넣다 > 명령 단추, 스크린 샷 참조 :
2. 그런 다음 마우스를 드래그하여 버튼을 그립니다. 버튼을 삽입 한 후 버튼 캡션을 변경할 수 있습니다. 개발자 > 등록,에 등록 대화 상자에 새 캡션을 입력하십시오.“스타트”옆의 텍스트 상자에있는이 버튼 표제, 스크린 샷 참조 :
![]() |
![]() |
![]() |
3. 위의 두 단계를 반복하여 다른 두 개의 버튼을 삽입하고 "중지"및"다시 쓰기”, 스크린 샷 참조 :
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
주의 사항: 위 코드에서 C2 스톱워치 시간이 삽입 될 셀이며 커맨드 버튼1, 커맨드 버튼2, 커맨드 버튼3 버튼 이름입니다. 정확한 버튼 이름은 이름 상자, 스크린 샷 참조 :
셋째, 스톱워치 시간 셀의 형식을 지정합니다.
6. 그런 다음 시간 셀을 다음과 같이 형식화해야합니다. 본문 형식, 필요에 따라 셀 크기, 글꼴, 글꼴 색상, 배경 등을 변경할 수 있습니다. 스크린 샷을 참조하십시오.
7. 위의 단계를 마친 후 지금부터 스타트 버튼을 누르면 시간이 시작됩니다. 중지 버튼을 누르면 시간이 중지됩니다. 다시 쓰기 버튼은 시간을 재설정합니다. 스크린 샷 참조 :
데모 : VBA 코드를 사용하여 세 개의 버튼이있는 스톱워치 만들기
최고의 사무 생산성 도구
Excel용 Kutools는 대부분의 문제를 해결하고 생산성을 80% 증가시킵니다.
- 재사용: 빠르게 삽입 복잡한 공식, 차트 그리고 이전에 사용한 모든 것; 셀 암호화 암호로; 메일 링리스트 생성 이메일 보내기 ...
- 슈퍼 포뮬러 바 (여러 줄의 텍스트와 수식을 쉽게 편집 할 수 있습니다.) 레이아웃 읽기 (많은 수의 셀을 쉽게 읽고 편집합니다.) 필터링 된 범위에 붙여 넣기...
- 셀 / 행 / 열 병합 데이터 손실없이; 셀 내용 분할; 중복 행 / 열 결합... 중복 셀 방지; 범위 비교...
- 중복 또는 고유 선택 행; 빈 행 선택 (모든 셀이 비어 있음); 슈퍼 찾기 및 퍼지 찾기 많은 통합 문서에서; 무작위 선택 ...
- 정확한 사본 수식 참조를 변경하지 않고 여러 셀; 참조 자동 생성 여러 시트에; 글 머리 기호 삽입, 확인란 등 ...
- 텍스트 추출, 텍스트 추가, 위치 별 제거, 공간 제거; 페이징 부분합을 만들고 인쇄합니다. 셀 내용과 주석 간 변환...
- 슈퍼 필터 (다른 시트에 필터 구성표 저장 및 적용) 고급 정렬 월 / 주 / 일, 빈도 등 특수 필터 굵은 기울임 꼴로 ...
- 통합 문서와 워크 시트 결합; 키 열을 기반으로 테이블 병합; 데이터를 여러 시트로 분할; xls, xlsx 및 PDF 일괄 변환...
- 300개 이상의 강력한 기능. Office / Excel 2007-2021 및 365를 지원합니다. 모든 언어를 지원합니다. 기업 또는 조직에서 쉽게 배포할 수 있습니다. 전체 기능은 30일 무료 평가판입니다. 60일 환불 보장.

Office Tab은 Office에 탭 인터페이스를 제공하여 작업을 훨씬 쉽게 만듭니다.
- Word, Excel, PowerPoint에서 탭 편집 및 읽기 사용, Publisher, Access, Visio 및 Project.
- 새 창이 아닌 동일한 창의 새 탭에서 여러 문서를 열고 만듭니다.
- 생산성을 50% 높이고 매일 수백 번의 마우스 클릭을 줄입니다!




























