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

Làm thế nào để tạo đồng hồ bấm giờ trong trang tính Excel?

Nếu có đồng hồ bấm giờ trong trang tính của bạn, bạn sẽ biết thời gian hoàn thành công việc. Làm cách nào bạn có thể tạo đồng hồ bấm giờ trong trang tính có Nút Bắt đầu, Dừng và Đặt lại như hình minh họa sau? Nếu bạn nhấp vào nút Bắt đầu, nó sẽ bắt đầu thời gian, nếu bạn nhấp vào nút Dừng, nó sẽ dừng thời gian và nút Đặt lại có thể giúp bạn đặt lại thời gian. Bài viết này, tôi sẽ nói về cách tạo một đồng hồ bấm giờ đơn giản và tiện dụng trong Excel.

doc tạo đồng hồ bấm giờ 1

Tạo đồng hồ bấm giờ có ba nút bằng cách sử dụng mã VBA


Tạo đồng hồ bấm giờ có ba nút bằng cách sử dụng mã VBA

Để tạo đồng hồ bấm giờ có ba nút Bắt đầu, Dừng và Đặt lại, vui lòng thực hiện lần lượt theo các bước sau.

Đầu tiên, chèn ba nút lệnh.

1. Nhấp chuột Nhà phát triển > Chèn > Nút lệnh, xem ảnh chụp màn hình:

doc tạo đồng hồ bấm giờ 2

2. Sau đó rê chuột để vẽ nút, sau khi chèn nút, bạn có thể thay đổi chú thích nút, vui lòng bấm vào Nhà phát triển > Bất động sản, Trong Bất động sản hộp thoại, nhập chú thích mới “Khởi đầu”Cho nút này trong hộp văn bản bên cạnh Chú thích, xem ảnh chụp màn hình:

doc tạo đồng hồ bấm giờ 3 2 doc tạo đồng hồ bấm giờ 4

3. Lặp lại hai bước trên để chèn hai nút khác và chú thích chúng là “Dừng"Và"Xóa và làm lại”, Xem ảnh chụp màn hình:

doc tạo đồng hồ bấm giờ 5

4. Sau khi chèn các nút, bạn nên thoát khỏi chế độ thiết kế bằng cách nhấp vào Nhà phát triển > Chế độ thiết kế.

Thứ hai, tạo mã VBA.

5. Và sau đó, nhấp chuột phải vào tab trang tính hiện tại và chọn Mã Chế độ xem, trong cửa sổ bật ra Microsoft Visual Basic cho các ứng dụng cửa sổ, vui lòng sao chép và dán mã sau vào mã tờ:

Mã VBA: Tạo đồng hồ bấm giờ:

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

doc tạo đồng hồ bấm giờ 6

Chú thích: Trong đoạn mã trên, C2 là ô mà thời gian đồng hồ bấm giờ sẽ được chèn và LệnhNút1, LệnhNút2, LệnhNút3 là tên nút, bạn có thể xem tên nút chính xác từ Tên Box, xem ảnh chụp màn hình:

doc tạo đồng hồ bấm giờ 7

Thứ ba, định dạng ô thời gian của đồng hồ bấm giờ.

6. Sau đó, bạn nên định dạng ô thời gian là bản văn định dạng và bạn có thể thay đổi kích thước ô, phông chữ, màu phông chữ, nền, v.v. khi cần, hãy xem ảnh chụp màn hình:

doc tạo đồng hồ bấm giờ 8

7. Sau khi hoàn thành các bước trên, kể từ bây giờ, khi bạn nhấp vào Khởi đầu , thời gian sẽ bắt đầu ngay bây giờ và nhấp vào Dừng , nó sẽ dừng thời gian, Xóa và làm lại nút sẽ đặt lại thời gian, xem ảnh chụp màn hình:

doc tạo đồng hồ bấm giờ 9


Demo: Tạo đồng hồ bấm giờ có ba nút bằng cách sử dụng mã VBA


Các công cụ năng suất văn phòng tốt nhất

Kutools cho Excel giải quyết hầu hết các vấn đề của bạn và tăng 80% năng suất của bạn

  • Tái sử dụng: Chèn nhanh công thức phức tạp, biểu đồ và bất cứ thứ gì bạn đã sử dụng trước đây; Mã hóa ô với mật khẩu; Tạo danh sách gửi thư và gửi email ...
  • Thanh siêu công thức (dễ dàng chỉnh sửa nhiều dòng văn bản và công thức); Bố cục đọc (dễ dàng đọc và chỉnh sửa số lượng ô lớn); Dán vào Dải ô đã Lọchữu ích. Cảm ơn !
  • Hợp nhất các ô / hàng / cột mà không làm mất dữ liệu; Nội dung phân chia ô; Kết hợp các hàng / cột trùng lặp... Ngăn chặn các ô trùng lặp; So sánh các dãyhữu ích. Cảm ơn !
  • Chọn trùng lặp hoặc duy nhất Hàng; Chọn hàng trống (tất cả các ô đều trống); Tìm siêu và Tìm mờ trong Nhiều Sổ làm việc; Chọn ngẫu nhiên ...
  • Bản sao chính xác Nhiều ô mà không thay đổi tham chiếu công thức; Tự động tạo tài liệu tham khảo sang Nhiều Trang tính; Chèn Bullets, Hộp kiểm và hơn thế nữa ...
  • Trích xuất văn bản, Thêm Văn bản, Xóa theo Vị trí, Xóa không gian; Tạo và In Tổng số phân trang; Chuyển đổi giữa nội dung ô và nhận xéthữu ích. Cảm ơn !
  • Siêu lọc (lưu và áp dụng các lược đồ lọc cho các trang tính khác); Sắp xếp nâng cao theo tháng / tuần / ngày, tần suất và hơn thế nữa; Bộ lọc đặc biệt bằng cách in đậm, in nghiêng ...
  • Kết hợp Workbook và WorkSheets; Hợp nhất các bảng dựa trên các cột chính; Chia dữ liệu thành nhiều trang tính; Chuyển đổi hàng loạt xls, xlsx và PDFhữu ích. Cảm ơn !
  • Hơn 300 tính năng mạnh mẽ. Hỗ trợ Office / Excel 2007-2021 và 365. Hỗ trợ tất cả các ngôn ngữ. Dễ dàng triển khai trong doanh nghiệp hoặc tổ chức của bạn. Đầy đủ tính năng Dùng thử miễn phí 30 ngày. Bảo đảm hoàn lại tiền trong 60 ngày.
tab kte 201905

Tab Office mang lại giao diện Tab cho Office và giúp công việc của bạn trở nên dễ dàng hơn nhiều

  • Cho phép chỉnh sửa và đọc theo thẻ trong Word, Excel, PowerPoint, Publisher, Access, Visio và Project.
  • Mở và tạo nhiều tài liệu trong các tab mới của cùng một cửa sổ, thay vì trong các cửa sổ mới.
  • Tăng 50% năng suất của bạn và giảm hàng trăm cú nhấp chuột cho bạn mỗi ngày!
officetab dưới cùng
Nhận xét (32)
Chưa có xếp hạng. Hãy là người đầu tiên xếp hạng!
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
Cảm ơn bạn cho bài viết này, nó rất hữu ích. Tuy nhiên, có cách nào để tinh chỉnh mã để làm cho bộ đếm thời gian không dừng khi một ô đang được chỉnh sửa? Lý tưởng nhất là tôi muốn nhấn "Bắt đầu", thực hiện một số thay đổi đối với một loạt ô trên cùng một tab, sau đó nhấn "Dừng" trong tổng thời gian đã trôi qua. Bất kỳ lời khuyên nào về điều này sẽ được đánh giá rất cao!
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
bạn đã bao giờ tìm ra điều này? Tôi cũng cần duy trì bộ hẹn giờ chạy trong khi các thay đổi khác đang được thực hiện trong cùng một bảng tính. cảm ơn. Mike
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
Đây là một trợ giúp tuyệt vời và rất dễ dàng để làm theo các bước.
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
Đã cố gắng tạo đồng hồ bấm giờ bằng các mã giống nhau trong Biểu mẫu. Bộ đếm thời gian bắt đầu hoàn toàn tốt nhưng không dừng lại. Vui lòng đề xuất cách sao chép giống nhau trong các biểu mẫu
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
Hãy thử Đồng hồ bấm giờ XNote.
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
Có cách nào để đồng hồ đếm ngược hoặc đếm ngược đến một thời điểm cụ thể không? Tôi muốn giữ các nút bắt đầu, dừng và đặt lại, nhưng tôi cần nó chỉ đếm tối đa một phút một giây, sau khi tôi nhấn bắt đầu. Hoặc đếm ngược từ một phút một giây đến 01 (01:XNUMX). Cảm ơn bạn đã giúp đỡ!
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
Xin chào, Melissa,
nếu bạn cần tạo đồng hồ đếm ngược trong trang tính, có thể bài viết sau đây có thể giúp bạn!
https://www.extendoffice.com/documents/excel/2144-excel-countdown-timer.html
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
chào bạn,

Tôi đã xem bài báo đó, nhưng tôi cần nó giống hệt như đồng hồ bấm giờ trên trang này, nhưng tôi cần nó chỉ đếm ngược từ một phút một giây. Tôi cần nó hiển thị ở dạng đồng hồ bấm giờ, nhưng hoạt động như một bộ đếm ngược. Có lời khuyên nào thêm không?


cảm ơn vì nhắn lại!
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
Nó dành cho một bảng điểm mà chúng tôi thiết kế bằng excel.
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
Tuyệt vời, nhưng liệu có thể chạy 2 đồng hồ trong cùng một trang tính không? đã tạo đồng hồ thứ hai với khởi động mới, dừng và đặt lại mông, nhưng khi bắt đầu đồng hồ thứ hai, đồng hồ đầu tiên dừng lại ....
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
giống như ở đây, bạn có thể tìm ra cách chữa trị cái này không
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
Xin chào các bạn,
Phương pháp này chỉ được áp dụng cho một tập hợp các nút trong trang tính.
Nếu có những ý kiến ​​hay khác, hãy comment tại đây.
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
Có thể tự động dừng hẹn giờ khi màn hình khóa và hẹn giờ tự động bắt đầu khi chúng ta mở khóa máy tính không?
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
Có cách nào để hẹn giờ đặt lại số đếm về XNUMX nhưng vẫn giữ cho đồng hồ chạy không? I E. Khi tôi nhấn Đặt lại, tôi không muốn phải nhấn lại Bắt đầu cho thời gian đánh dấu.
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
Xin chào, tôi đang sử dụng nút chặn này nhưng khá thường xuyên các số trong ô hiển thị ("C2") bắt đầu sai lệch và biến mất - chúng hiển thị dấu trừ, các chữ số không rõ ràng và số đếm bị mất. Nó thường xảy ra sau khoảng một giờ hoặc hơn nhưng đôi khi thậm chí trước một giờ trôi qua. Đây có phải là một lỗi phổ biến? và nếu có thì có cách nào khắc phục không? Tôi đã xóa .00 (tức là mili giây) khỏi mã bằng cách xóa: & "." & Định dạng (0, "00") dòng bất cứ nơi nào nó xuất hiện - điều đó có liên quan gì đến vấn đề này không?
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
Cảm ơn mẹo của bạn, Nó đang hoạt động trơn tru nhưng khi tôi nhập bất kỳ dữ liệu nào vào trang tính này, nó đã ngừng chạy, Chúng tôi cần nó tiếp tục chạy dữ liệu đầu vào trong một thời gian. Làm thế nào chúng tôi có thể khắc phục sự cố này?
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
Xin chào, Nhoeun,
Có thể đó không phải là một cách tốt để giải quyết vấn đề của bạn. Khi bạn chỉnh sửa một ô, nó sẽ làm gián đoạn macro hiện đang được thực thi.
Nếu bạn có phương pháp nào hay khác, hãy comment tại đây nhé!
Cảm ơn bạn!
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
CHÀO. Tôi đã tạo ra đồng hồ bấm giờ, nhưng cần có thể lưu các khoảng thời gian khác nhau giữa bắt đầu và dừng để có thể phản ánh chúng dưới dạng nghiên cứu thời gian và chuyển động. Bất kỳ lời khuyên về cách làm điều đó?
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
Đã hoàn thành tất cả các bước nhưng khi nhấp vào nút bắt đầu, thông báo lỗi "Không thể chạy macro" 'file.xlsm'! CommandButton1 ". Macro có thể không khả dụng trong sổ làm việc này hoặc tất cả macro có thể bị vô hiệu hóa.". Tất cả các macro đã được bật, macro nằm trong Module1. LƯU Ý: Tôi đang chạy Office 2019 cho Mac nên đó có thể là sự cố ....
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
Làm thế nào về việc thêm tính năng "+ 10s" & "2x Speed" trong mã này?
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
ở đây có phải là 'bộ đếm thời gian' không? không thấy sự liên quan của nó trong mã.
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
Có thể để bộ đếm chỉ đếm giây?
Vì vậy, khi nó đạt đến 59 giây, nó tiếp tục với 60, 61, 62, 63….
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
Xin chào
Đã làm theo các bước nhưng không thể có thời gian xuất hiện trong ô hẹn giờ. Tôi đã sao chép mã nhưng tôi có thể kiểm tra 1. Rằng số dòng là không cần thiết hoặc là chúng2. Đó là tôi đặt mã vào mô-đun 1 không phải sheet1 hoặc This workbook3. Nếu có một macro được liệt kê trong danh sách macro sau khi thực hiện tất cả những điều này - của tôi thì không.
Cảm ơn
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
Xin chào, Janice, Bạn nên đặt mã vào mô-đun trang tính hoạt động của mình như bước 5.
5. Và sau đó, nhấp chuột phải vào tab trang tính hiện tại và chọn Mã Chế độ xem, trong cửa sổ Microsoft Visual Basic for Applications hiện ra, vui lòng sao chép và dán mã sau vào Mô-đun.

Và bạn nên thay đổi tên nút thành của riêng bạn.
Lưu ý: Trong đoạn mã trên, C2 là ô sẽ chèn thời gian đồng hồ bấm giờ và LệnhNút1, LệnhNút2, LệnhNút3 là các tên nút, bạn có thể xem tên nút chính xác từ Hộp Tên.

Vui lòng kiểm tra chúng, cảm ơn bạn!
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
Điều này là tuyệt vời! Cảm ơn, Chris H
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
Có thể sử dụng hộp kết hợp hoặc lựa chọn thả xuống để bắt đầu và dừng đồng hồ không
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
Bonjour, j'ai voulu intégrer ce chronomètre à une autre macro, déterminer le temps d'utilisation du fichier. La macro se lance mais bloque l'utilisation du fichier.Comment faire pour tasiser votre chronomètre en même temps que d'autres mã VBA? MerciHenry.
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
Xin chào! Cảm ơn bạn vì điều này, tôi phải làm như thế nào để nó điền thời gian vào các ô tiếp theo, ví dụ. thời gian bắt đầu / dừng cho ô C2, sau đó là thời gian bắt đầu / dừng khác cho ô c3, c4, c5, v.v. 
Không có bình luận nào được đăng ở đây
Tải thêm
Để lại ý kiến ​​của bạn
Đăng với tư cách khách
×
Đánh giá bài viết này:
0   Nhân vật
Các vị trí được đề xuất

Kết nối với chúng tôi

Bản quyền © 2009 - www.extendoffice.com. | Đã đăng ký Bản quyền. cung cấp bởi ExtendOffice. | BẢN ĐỒ CHI NHÁNH
Microsoft và logo Office là các nhãn hiệu hoặc nhãn hiệu đã đăng ký của Microsoft Corporation tại Hoa Kỳ và / hoặc các quốc gia khác.
Được bảo vệ bởi Sectigo SSL