Trước đây Hocviendaotao.com đã từng hướng dẫn bạn đọc cách tạo đồng hồ đếm ngược trong slide PowerPoint thông qua việc sử dụng các hiệu ứng chuyển động. Và với Excel, chúng ta hoàn toàn có thể tạo đồng hồ đếm ngược với cách thực hiện cũng đơn giản, thông qua việc sử dụng mã code VBA.
Theo đó người dùng lựa chọn kiểu định dạng thời gian muốn hiển thị rồi nhập mã code VBA để tiến hành đếm ngược thời gian. Khi chạy code, đồng hồ trong Excel tự động đếm ngược và bạn sẽ nhìn thấy thời gian thay đổi. Khi hết thời gian đếm ngược, Excel sẽ gửi thông báo tới người dùng. Bài viết dưới đây sẽ hướng dẫn bạn đọc cách chèn đồng hồ đếm ngược vào Excel.
Hướng dẫn chèn đồng hồ đếm ngược trong Excel
Video chèn đồng hồ đếm ngược trong Excel
Trước hết chúng ta chọn 1 ô trống để nhập thời gian đếm ngược, rồi click chuột phải chọn Format Cells....


Bây giờ chúng ta nhập khoảng thời gian muốn đếm ngược, theo từng giờ, từng phút hay từng giây tùy thích. Chỉnh định dạng lại cho ô thời gian, màu sắc, kiểu chữ, font chữ, kích cỡ chữ để làm nổi bật ô hơn.

Khi đã tạo xong ô thời gian đếm ngược, nhấn vào tab Developer rồi nhấn vào Visual Basic để mở trình soạn code VBA.


Dim gCount As Date 'Updateby20140925 Sub Timer() gCount = Now + TimeValue("00:00:01") Application.OnTime gCount, "ResetTime" End Sub Sub ResetTime() Dim xRng As Range Set xRng = Application.ActiveSheet.Range("D1") xRng.Value = xRng.Value - TimeSerial(0, 0, 1) If xRng.Value <= 0 Then MsgBox "Countdown complete." Exit Sub End If Call Timer End Sub



Để cố định đồng hồ này trong giao diện làm việc trong Excel, bạn click vào ô phía dưới ô đồng hồ, rồi chọn tab View chọn tiếp vào Freeze Panes và nhấn Freeze Panes để cố định hàng.



Chúc các bạn thực hiện thành công!

Khóa học "Thiết kế bài giảng điện tử", Video, hoạt hình
Cập nhật công nghệ từ Youtube tại link: congnghe.hocviendaotao.com
Tham gia nhóm Facebook
Để tham gia khóa học công nghệ truy cập link: http://thuvien.hocviendaotao.com
Mọi hỗ trợ về công nghệ email: dinhanhtuan68@gmail.com