Cara memasukkan stempel waktu menggunakan vba (dengan contoh)

Anda dapat menggunakan sintaks dasar berikut di VBA untuk menyisipkan stempel waktu ke dalam sel tertentu di Excel:

 SubInsertTimestamp ()

Range("A1").Value = Format(Now, "mm/dd/yyyy hh:mm:ss")
    
End Sub

Makro khusus ini menyisipkan waktu saat ini dalam format bb/dd/yyyy hh:mm:ss ke dalam sel A1 .

Catatan : Fungsi Now VBA mengembalikan tanggal dan waktu saat ini berdasarkan tanggal dan waktu sistem komputer Anda.

Contoh berikut menunjukkan cara menggunakan sintaksis ini dalam praktiknya.

Contoh: Cara memasukkan stempel waktu menggunakan VBA

Misalkan kita membuat makro berikut untuk memasukkan tanggal dan waktu saat ini sebagai stempel waktu ke dalam sel A1 lembar kita saat ini di Excel:

 SubInsertTimestamp ()

Range("A1").Value = Format(Now, "mm/dd/yyyy hh:mm:ss")
    
End Sub

Saat kami menjalankan makro ini, kami menerima keluaran berikut:

Sel A1 sekarang menampilkan tanggal dan waktu saat makro ini dijalankan.

Untuk contoh khusus ini, datetime dalam format mm/dd/yyyy hh:mm:ss .

Perhatikan bahwa kami juga dapat menentukan format lain yang akan digunakan.

Misalnya, kita dapat membuat makro berikut untuk menampilkan waktu saat ini dalam format dd-mm-yyyy hh:mm:ss di sel B1 :

 SubInsertTimestamp ()

Range("A1").Value = Format(Now, "mm/dd/yyyy hh:mm:ss")
Range("B1").Value = Format(Now, "dd-mm-yyyy hh:mm:ss")

End Sub

Saat kami menjalankan makro ini, kami menerima keluaran berikut:

Sel A1 dan B1 sekarang menampilkan tanggal dan waktu saat ini dalam format berbeda.

Catatan : Anda dapat menemukan dokumentasi lengkap fungsi Format di VBA di sini .

Sumber daya tambahan

Tutorial berikut menjelaskan cara melakukan tugas umum lainnya di VBA:

Bagaimana membandingkan tanggal di VBA
Cara memformat waktu di VBA
Cara menghitung perbedaan waktu di VBA