Excel'de tarih ve zaman damgasını hızlıca ve otomatik olarak ekleme

Excel’de tarih ve zaman damgası eklemek oldukça yaygın bir işlemdir. Bu öğreticide, farklı senaryolara yönelik olarak Excel hücrelerine tarih ve zaman damgasını hem elle hem de otomatik olarak ekleme yöntemlerini inceleyeceğiz.

Tarih ekle ve kısayollarla zaman damgası ekleme

Tarih ekle ve formülle zaman damgası ekleme

Başka bir sütuna veri girerken otomatik olarak zaman damgası ekleyen formül

Başka bir sütuna veri girerken otomatik olarak zaman damgası ekleyen VBA kodu

---

Yalnızca birkaç hücreye tarih ve zaman damgası eklemeniz gerekiyorsa, bunları kısayol tuşlarına basarak kolayca elle ekleyebilirsiniz.

Geçerli tarihi ekle:Control+:

Geçerli saati ekle:Shift+Control+:

Ekran görüntüsüne bakın:

İpuçları:

1. Çıktılarınızı istediğiniz tarih veya saat biçiminde, Hücre Biçimini Ayarla iletişim kutusunu kullanarak biçimlendirebilirsiniz.

2. Eğer Kutools for Excel yüklüyse, geçerli tarihi veya ihtiyaç duyduğunuz diğer tarihleri istediğiniz biçimde Tarih ekle işleviyle ekleyebilirsiniz.Ücretsiz indirmek için tıklayın

---

Otomatik olarak güncellenen bir tarih veya zaman damgası eklemek istiyorsanız aşağıdaki formüllerden yararlanabilirsiniz.

Geçerli tarihi ekle

=TODAY()

Enter tuşuna basın; geçerli tarih hücreye eklenir.

Geçerli saati ekle：

=NOW()

Enter tuşuna basın; geçerli tarih ve saat hücreye eklenir.

İpuçları:

1. Çıktıları istediğiniz tarih veya saat biçiminde, Hücre Biçimini Ayarla iletişim kutusunu kullanarak biçimlendirebilirsiniz. Örneğin, yalnızca geçerli saati görüntülemek istiyorsanız, =NOW() formülünü kullandıktan sonra hücreyi Saat olarak biçimlendirin.

2. Çalışma sayfası üstbilgisine veya altbilgisine Geçerli Tarih ve Saat eklemek istiyorsanız, bu işi hızlıca halletmek için Çalışma Kitabı Bilgisi Ekle işlevini kullanabilirsiniz.Kutools for ExcelÜcretsiz indirmek için tıklayın

---

Diyelim ki iki sütununuz var: A Sütunu ve B Sütunu. A Sütununa veri girerken B Sütununa otomatik olarak geçerli zaman damgasını nasıl ekleyebilirsiniz?

Veri girerken zaman damgasını otomatik ekleme

1. İlk olarak, Dosya > Seçenekler seçeneğine tıklayarak Excel Seçenekleri iletişim kutusunu açın. Sol bölmeden Formüller bölümünü seçin ve ardından Hesaplama seçenekleri grubundaki Yinelemeli hesabı etkinleştir seçeneğini işaretleyin. Son olarak Tamam’a tıklayın.

2. Örneğin, B sütunundaki B1 hücresine aşağıdaki formülü girin:

=IF(A1<,>,"",IF(B1<,>,"",B1,NOW()),"")

Sonra, otomatik doldurma tutamacını hücreler boyunca aşağı doğru sürükleyin.

3. Ardından, formül hücrelerini istediğiniz tarih-saat biçiminde biçimlendirin: Formül hücrelerini seçili tutun, içerik menüsünü açmak için sağ tıklayın ve Hücre biçimini ayarlar seçeneğini seçin; böylece Hücre biçimini ayarlar iletişim kutusu açılacak. Sayı sekmesinin altındaki Özel bölümünde, ihtiyacınız olan biçimi Tür metin kutusuna yazın ve Tamam'a tıklayın.

Artık A Sütununa veri girdiğinizde geçerli tarih-saat B Sütununa eklenecektir.

Başka bir sütundaki hücre değiştiğinde zaman damgasını otomatik ekleme ve güncelleme

Eğer hücreye veri girildiğinde otomatik olarak zaman damgası eklemek ve aynı zamanda giriş değiştiğinde eklenen zaman damgasının da güncellenmesini istiyorsanız aşağıdaki formülü kullanabilirsiniz:

=IF(A1<,>,"",IF(AND(B1<,>,"",CELL("address")=ADDRESS(ROW(A1),COLUMN(A1))),NOW(),IF(CELL("address")<,>,ADDRESS(ROW(A1),COLUMN(A1)),B1,NOW())),"")

A1, veri gireceğiniz hücre; B1 ise zaman damgası eklemek istediğiniz formül hücresidir.

Otomatik doldurma tutamacını, kullanmak istediğiniz hücrelere kadar aşağı doğru sürükleyin.

Ardından, formül hücrelerini istediğiniz tarih-saat biçiminde biçimlendirmek için Hücre biçimini ayarlar iletişim kutusunu kullanın: formül hücrelerini seçili tutun, içerik menüsünü açmak için sağ tıklayın ve Hücre biçimini ayarlar seçeneğini seçin; böylece Hücre biçimini ayarlar iletişim kutusu açılacaktır. Sayı sekmesinin altındaki Özel bölümünde, ihtiyacınız olan biçimi Tür metin kutusuna yazın ve Tamam'a tıklayın.

---

VBA koduna aşinasanız aşağıdaki gibi yapabilirsiniz:

1. Kullandığınız çalışma sayfası sekmesine sağ tıklayın ve içerik menüsünden Kodu Görüntüle seçeneğini seçin.

2. Ardından, Microsoft Visual Basic for Applications penceresine aşağıdaki kodu yapıştırın.

VBA: Otomatik zaman damgası ekleme

Private Sub Worksheet_Change(ByVal Target As Range)
'UpdatebyKutools20190919
Dim xRInt As Integer
Dim xDStr As String
Dim xFStr As String
On Error Resume Next
xDStr = "A" 'Data Column
xFStr = "B" 'Timstamp Column
If (Not Application.Intersect(Me.Range(xDStr & ":" & xDStr), Target) Is Nothing) Then
       xRInt = Target.Row
       Me.Range(xFStr & xRInt) = Format(Now(), "mm/dd/yyyy hh:mm:ss")
End If
End Sub

3. Ardından bu kodu kaydedin. Bundan sonra A Sütununa veri girdiğiniz veya değiştirdiğiniz sürece yeni zaman damgası B Sütununa eklenecektir.

Not: VBA kodundaki A ve B sütunlarını ile mm/dd/yyyy hh:mm:ss saat biçimini gerçek ihtiyaçlarınıza göre özelleştirebilirsiniz.

Tanımlı işlevi kullanmak istiyorsanız aşağıdaki gibi yapabilirsiniz:

1. Alt + F11 tuşlarına basarak Microsoft Visual Basic for Applications penceresini açın. Ardından Ekle > Modül seçeneğine tıklayarak boş bir modül ekleyin.

2. Yeni modüle aşağıdaki kodu yapıştırın. Ardından kodu kaydedip çalışma sayfasına geri dönün.

Function FormatDate(xRg As Range)
'UpdatebyKutools20190919
On Error GoTo Err_01
If xRg.Value <> "" Then
    FormatDate = Format(Now, "mm/dd/yyyy hh:mm:ss")
Else
    FormatDate = ""
End If
Exit Function
Err_01:
    FormatDate = "Error"
End Function

3. Zaman damgası eklenecek hücreye şu formülü yazın

=FormatDate(F1)

F1, veri gireceğiniz veya değiştireceğiniz hücredir. Ardından, otomatik doldurma tutamacını aşağı doğru, istediğiniz hücrelere kadar sürükleyin.

Artık F1 hücresine veri girildiğinde veya güncellendiğinde, otomatik olarak geçerli tarih ve saat eklenecektir.

---