Cara Memasukkan Stempel Waktu di Excel Saat Sel Berubah (2 Cara Efektif)

Hugh West

04-07-2023 Rumus Excel
  • Bagikan Ini
Hugh West

Artikel ini mengilustrasikan bagaimana cara memberikan timestamp di excel ketika suatu cell berubah. Kamu mungkin perlu melacak entri data pada cell-cell kolom tertentu. Misalnya, kamu telah menyediakan kolom B untuk memasukkan data. Sekarang kamu ingin timestamp pada cell yang berdekatan di kolom C ketika suatu cell diperbaharui di kolom B. Artikel ini akan membantumu melakukannya dengan 2 cara efektif.

Unduh Buku Kerja Praktik

Anda bisa mengunduh buku kerja latihan dari tombol unduh di bawah ini.

Cap waktu di Excel.xlsm

2 Cara untuk Menyisipkan Stempel Waktu di Excel Saat Sel Berubah

1. Gunakan Fungsi IF, AND, NOW dan Lainnya untuk Menyisipkan Stempel Waktu di Excel

Ikuti langkah-langkah di bawah ini untuk mendapatkan cap waktu menggunakan rumus saat sel berubah.

📌 Langkah-langkah

  • Pers pertama ALT+F+T untuk membuka Opsi Excel Kemudian pergi ke Rumus Selanjutnya, periksa tab Mengaktifkan penghitungan iteratif Kemudian, atur kotak centang Iterasi Maksimum ke 1. Setelah itu, klik OK.

  • Sekarang, masukkan rumus berikut di sel C5 Kemudian, seret Isi Gagang untuk menyalin rumus ke sel di bawah ini.
=IF(AND(B5"",D5B5),NOW(),IF(B5="","",C5))

  • Kemudian, masukkan rumus berikut di sel D5 Selanjutnya seret Isi Gagang ikon ke sel di bawah seperti sebelumnya.
=IF(B5="","",IF(OR(C5="",AND(ISNUMBER(D5),B5=D5)),D5,B5))

  • Sekarang, mulai memasukkan nilai dalam sel di kolom B Setelah itu, Anda akan mendapatkan hasil sebagai berikut. Di sini, kolom D Anda bisa menyembunyikannya dengan mengklik kanan setelah memilih kolom.

  • Alternatifnya, Anda bisa memasukkan rumus berikut di sel C5 untuk mendapatkan hasil yang sama.
=IF(B5"",IF(C5="",NOW(),C5),"")

  • Anda mungkin perlu mengubah pemformatan sel dalam kolom C Pilih kolom dengan mengklik nomor kolom di bagian atas. Kemudian tekan CTRL+1 untuk membuka Format Sel Sekarang, klik pada kotak dialog Adat format angka. Selanjutnya, masukkan d-mmm-yyyy hh:mm:ss AM/PM di Jenis Terakhir, klik OK.

Rincian Formula:

Rumus di Sel C5:

➤ IF(B5="","","",C5))

The Fungsi IF tidak mengembalikan apa pun jika sel B5 kosong. Jika tidak, mengembalikan nilai yang sama yang tersimpan dalam C5 .

➤ SEKARANG()

The SEKARANG berfungsi mengembalikan tanggal dan waktu saat ini.

➤ DAN (B5"", D5B5)

The DAN fungsi kembali BENAR jika kedua argumen benar yaitu sel B5 tidak kosong dan sel B5 dan D5 tidak memiliki nilai yang sama.

➤ IF(AND(B5"",D5B5),NOW(),IF(B5="","",C5))

Jika DAN fungsi kembali BENAR , maka Fungsi IF mengembalikan tanggal dan waktu saat ini yang diperoleh dari SEKARANG berfungsi Jika tidak, ia mengembalikan hasil yang diperoleh dari argumen yang berisi Fungsi IF .

Rumus di Sel D5:

➤ ISNUMBER (D5)

The Fungsi ISNUMBER kembali BENAR jika sel D5 berisi angka. Jika tidak, ia mengembalikan Salah .

➤ DAN(ISNUMBER(D5), B5=D5)

The DAN fungsi kembali BENAR jika sel D5 berisi angka dan sel B5 dan D5 memiliki nilai yang sama. SALAH jika tidak.

➤ OR(C5="",AND(ISNUMBER(D5),B5=D5))

The ATAU fungsi kembali BENAR jika salah satu argumen benar, yaitu sel C5 kosong atau DAN fungsi kembali BENAR . kembali SALAH jika semua argumennya salah.

➤ IF(OR(C5="",AND(ISNUMBER(D5),B5=D5)),D5,B5)

The Fungsi IF mengembalikan nilai yang sama yang disimpan di sel D5 jika ATAU fungsi kembali BENAR Jika tidak, ia mengembalikan nilai sel B5 .

➤ IF(B5="","",IF(OR(C5="",AND(ISNUMBER(D5),B5=D5)),D5,B5))

The Fungsi IF tidak mengembalikan apa pun jika sel B5 kosong. Jika tidak, ia mengembalikan hasil yang diperoleh dari argumen yang berisi Fungsi IF .

Baca Juga: Cara Memasukkan Timestamp Excel Saat Sel Berubah Tanpa VBA (3 Cara)

Bacaan Serupa

  • Cara Memasukkan Tanggal Statis di Excel (4 Metode Sederhana)
  • Excel VBA: Sisipkan Stempel Waktu Saat Makro Dijalankan
  • Cara Memasukkan Stempel Tanggal Excel Saat Sel dalam Baris Dimodifikasi
  • Ubah Cap Waktu Unix menjadi Tanggal di Excel (3 Metode)

2. Terapkan Kode VBA untuk Menyisipkan Stempel Waktu di Excel Saat Sel Berubah

Kamu juga bisa mendapatkan timestamp di excel ketika suatu cell berubah dengan menggunakan VBA. Ikuti langkah-langkah di bawah ini untuk bisa melakukan hal tersebut.

📌 Langkah-langkah

  • Pertama, klik kanan pada tab lembar kerja target. Kemudian, pilih Lihat Kode Ini akan membuka modul kode untuk lembar kerja tertentu.

  • Selanjutnya, salin kode berikut menggunakan tombol salin di sudut kanan atas. 
 Private Sub Worksheet_Change(ByVal Target As Range) Dim CellCol, TimeCol, Row, Col As Integer Dim DpRng, Rng As Range CellCol = 2 TimeCol = 3 Row = Target.Row Col = Target.Column If Row <= 4 Then Exit Sub Timestamp = Format(Now, "DD-MM-YYYY HH:MM:SS AM/PM") If Target.Text "" Then If Col = CellCol Then Cells(Row, TimeCol) = Timestamp Else On Error Resume Next Set DpRng = Target.Dependents ForEach Rng In DpRng If Rng.Column = CellCol Then Cells(Rng.Row, TimeCol) = Timestamp End If Next End If End If End If End Sub
  • Setelah itu, tempelkan kode yang telah disalin pada modul kosong seperti yang ditunjukkan di bawah ini.

  • Berikutnya, simpan dokumen sebagai buku kerja berkemampuan makro Sekarang, mulailah memasukkan data dalam sel di kolom B. Maka Anda akan mendapatkan hasil yang sama seperti sebelumnya.

Penjelasan Kode VBA:

Private Sub Lembar Kerja_Perubahan(ByVal Target As Range)

Dim CellCol, TimeCol, Row, Col As Integer

Dim DpRng, Rng Sebagai Range

Mendeklarasikan variabel yang diperlukan.

CellCol = 2

Kolom entri data.

TimeCol = 3

Kolom cap waktu.

Row = Target.Row

Col = Target.Column

Menyimpan nomor baris dan kolom dari sel yang dipilih.

Jika Baris <= 4 Maka Keluar Sub

Perubahan apa pun dalam 4 baris teratas tidak akan membuat timestamp.

Timestamp = Format(Now, "DD-MM-YYYY HH:MM:SS AM/PM")

Timestamp akan diformat seperti ini. Ubahlah sesuai kebutuhan.

Jika Target.Text "" Maka

Jika Col = CellCol Lalu

Sel (Baris, TimeCol) = Timestamp

Membuat cap waktu jika sel yang dipilih kosong.

Pada Kesalahan Lanjutkan Berikutnya

Mengabaikan kesalahan apa pun jika terjadi.

Set DpRng = Target.Dependents

Untuk Setiap Rng Dalam DpRng

Jika Rng.Column = CellCol Maka

Sel(Rng.Row, TimeCol) = Timestamp

Buat cap waktu untuk rentang sel jika tidak kosong.

Baca Juga: Cara Memasukkan Entri Data Timestamp secara Otomatis di Excel (5 Metode)

Hal-hal yang Perlu Diingat

  • Anda perlu menggunakan format khusus untuk sel di kolom B untuk mendapatkan cap waktu yang diformat dengan benar.
  • Rumus alternatif hanya berfungsi saat data dimasukkan dalam sel kosong.
  • Di sini, entri data dan kolom timestamp dikodekan dalam kode VBA. Anda perlu memodifikasi kode berdasarkan dataset Anda.

Kesimpulan

Sekarang kamu sudah mengetahui cara timestamp di excel ketika suatu cell berubah. Apakah kamu memiliki pertanyaan atau saran lebih lanjut? Silahkan gunakan kolom komentar di bawah ini untuk itu. Kamu juga bisa mengunjungi ExcelWIKI Tetaplah bersama kami dan teruslah belajar.

Postingan sebelumnya Cara Menghapus Tabel Pivot di Excel (3 Metode Mudah)
Postingan berikutnya Hapus Baris Jika Sel Berisi Nilai Tertentu di Excel (3 Metode)

Hugh West adalah pelatih dan analis Excel yang sangat berpengalaman dengan pengalaman lebih dari 10 tahun di industri ini. Beliau meraih gelar Sarjana di bidang Akuntansi dan Keuangan dan gelar Master di bidang Administrasi Bisnis. Hugh memiliki hasrat untuk mengajar dan telah mengembangkan pendekatan pengajaran unik yang mudah diikuti dan dipahami. Pengetahuan ahlinya tentang Excel telah membantu ribuan siswa dan profesional di seluruh dunia meningkatkan keterampilan dan unggul dalam karier mereka. Melalui blognya, Hugh membagikan pengetahuannya kepada dunia, menawarkan tutorial Excel gratis dan pelatihan online untuk membantu individu dan bisnis mencapai potensi penuh mereka.