Cara Memasukkan Penghitung Waktu Mundur di Lembar Kerja Excel

Di lembar kerja baru yang terbuka, navigasikan ke sel A1. Ini akan menjadi lokasi contoh timer.

Klik kanan sel A1 dan pilih Format Sel.

Pilih Waktu dari kotak Kategori dan pilih salah satu format jam: menit: detik. Klik Oke untuk mengatur format sel.

Akses jendela pengeditan Visual Basic dengan menekan ALT-F11. Klik Menyisipkan dari bilah menu dan klik Modul.

Masukkan teks berikut di jendela Module1:

Redupkan gHitung Sebagai Tanggal
Sub Timer()
gCount = Sekarang + TimeValue("00:00:01")
Aplikasi. gCount Tepat Waktu, "EndMessage"
Akhir Sub
Sub Pesan Akhir()
Redupkan xRng Sebagai Rentang
Setel xRng = Aplikasi. Lembar aktif. Rentang("A1")
xRng. Nilai = xRng. Nilai - TimeSerial (0, 0, 1)
Jika xRng. Nilai <= 0 Maka
MsgBox "Hitung mundur selesai."
Keluar Sub
Berakhir jika
Pengatur Waktu Panggilan
Akhir Sub

Kamu bisa Salin dan tempel teks kode di atas, atau Anda dapat mengetikkannya, baris demi baris, ke dalam jendela Module1. Editor VBA menerapkan pemformatan sesuai kebutuhan.

Minimalkan jendela VBA dengan mengklik - simbol di pojok kanan atas. Klik Mengajukan pada pita dan Simpan Sebagai. Pilih lokasi untuk menyimpan file Anda. Di jendela Simpan Sebagai, beri nama buku kerja Anda dan pilih Buku Kerja Excel Macro-Enabled (*.xlsm) dari Simpan sebagai tipe daftar drop-down. Klik Menyimpan dan kembali ke buku kerja.

Klik pada sel A1 dan masuk 0:3:0, lalu tekan Memasuki. Ini mengatur waktu untuk 0 jam, 3 menit dan 0 detik.

Klik Melihat tab pada pita dan klik makro. Pilih pengatur waktu dari daftar Makro dan klik Lari. Sel pengatur waktu Anda akan mulai menghitung mundur hingga nol, ketika a Hitung Mundur Selesai dialog terbuka. Klik Oke untuk kembali ke pekerjaan Anda.

Tip