Bagaimana cara memasukkan penghitung waktu mundur di Excel?
Jika Anda ingin menangani beberapa data dalam waktu terbatas, Anda dapat memasukkan penghitung waktu mundur di lembar kerja data Anda, dan ketika selesai hitungan mundur waktu, akan ada dialog yang muncul untuk mengingatkan Anda. Di sini saya akan memberi tahu Anda kode VBA untuk memasukkan penghitung waktu mundur di Excel.
Masukkan penghitung waktu mundur di Excel
Masukkan penghitung waktu mundur di Excel
Di Excel, tidak dapat menghitung waktu mundur, tetapi Anda dapat menyalin kode VBA berikut untuk membantu menghitung mundur waktu.
1. Pilih sel dan format sebagai format waktu dengan mengklik kanan pada sel dan memilih Format Cells, lalu di dialog, mengklik Waktu dan memilih 13:30:55 dalam Tipe daftar, pada klik terakhir OK untuk keluar dari dialog ini. Lihat tangkapan layar:
2. Ketik waktu yang Anda inginkan untuk hitung mundur ke dalam sel format. Lihat tangkapan layar:
3. tekan Alt + F11 kunci untuk membuka Microsoft Visual Basic untuk Aplikasi jendela.
4. klik Menyisipkan > Modul lalu salin mengikuti VBA ke jendela baru.
VBA: Penghitung waktu mundur.
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("E1")
xRng.Value = xRng.Value - TimeSerial(0, 0, 1)
If xRng.Value <= 0 Then
MsgBox "Countdown complete."
Exit Sub
End If
Call Timer
End Sub
jenis: E1 pada kode di atas menunjukkan sel waktu yang Anda ketik di langkah 2.
5. klik Run tombol atau tekan F5 untuk menjalankan penghitung waktu mundur. Sekarang waktu dihitung mundur.
6. Dan saat hitungan mundur selesai, dialog yang muncul akan mengingatkan Anda.
jenis: Anda tidak bisa menghentikan hitungan mundur saat berjalan kecuali menutup buku kerja.
Alat Produktivitas Kantor Terbaik
Tingkatkan Keterampilan Excel Anda dengan Kutools for Excel, dan Rasakan Efisiensi yang Belum Pernah Ada Sebelumnya. Kutools for Excel Menawarkan Lebih dari 300 Fitur Lanjutan untuk Meningkatkan Produktivitas dan Menghemat Waktu. Klik Di Sini untuk Mendapatkan Fitur yang Paling Anda Butuhkan...
Tab Office Membawa antarmuka Tab ke Office, dan Membuat Pekerjaan Anda Jauh Lebih Mudah
- Aktifkan pengeditan dan pembacaan tab di Word, Excel, PowerPoint, Publisher, Access, Visio, dan Project.
- Buka dan buat banyak dokumen di tab baru di jendela yang sama, bukan di jendela baru.
- Meningkatkan produktivitas Anda sebesar 50%, dan mengurangi ratusan klik mouse untuk Anda setiap hari!