Excel VBA Zaman Damgası Kullanılarak Otomatik Olay Günlükleri Nasıl Eklenir

Zaman damgaları, bir olayın ne zaman gerçekleştiğini belirlemek için harika bir kaynaktır. Microsoft Excel size gg:dd:yyyyss:dd:ss biçiminde zaman damgaları ekleme seçeneği sunar. Çoğunlukla, manuel ve hataya açık bir görev olan zaman damgalarını eklemek için klavye kısayollarını kullanmanız veya Excel işlevlerini yürütmeniz gerekir.

Excel Visual Basic kod düzenleyicisi, VBA zaman damgası betiklerini kullanarak tüm görevi otomatikleştirmenizi sağlayarak imdadınıza yetişir. Veri girişi operatörüne veya ortak çalışana güvenmeden görevi daha fazla otomatikleştirmek için karmaşık koşullar da ekleyebilirsiniz. Excel'de zaman damgaları eklemek için VBA'yı kullanmanın birkaç basit yolunu öğrenmek için okumaya devam edin.

1. VBA Zaman Damgası nasıl eklenir: QAT Makrosu

Aşağıdaki VBA kodu, Excel hızlı erişim araç çubuğundan veya QAT'tan tek bir tıklamayla istediğiniz zaman olay günlüğü işlevini çalıştırmanıza olanak tanır. Bir Excel VBA makrosu çalıştırmaya benzer , bu nedenle VBA kodunu uyguladıktan sonra mevcut çalışma sayfasını Makro etkin bir dosya uzantısı kullanarak kaydetmeniz gerekir :

• Çalışma sayfası sekmesine sağ tıklayın ve içerik menüsünden Kodu Görüntüle'ye tıklayın.
• Bu VBA kodunu kopyalayıp kod düzenleyiciye yapıştırın ve ardından Kaydet'e tıklayın .

Sub vba_timeStamp() Dim ts As Date With Selection .Value = Date + Time End With End Sub

• Çalışma kitabını Makro özellikli bir dosya olarak kaydedin.
• Şimdi, Dosya sekmesine tıklayın ve Dosya menüsünden Seçenekler'i seçin.
• Hızlı Erişim Araç Çubuğu'na (QAT) tıklayın ve ardından Makroları Görüntüle'yi bulmak için listeyi kaydırın .
• QAT'a Makroları Görüntüle'yi ekleyin ve Tamam'a tıklayarak Seçenekler menüsünü kapatın .
• Şimdi, VBA kodunu çalıştırarak bir zaman damgası eklemeniz gerektiğinde QAT'tan Makroyu çalıştırın.

Zaman damgası oluşturma görevini tamamen otomatikleştirmek için aşağıda belirtilen VBA komut dosyalarını kullanabilirsiniz.

2. VBA Zaman Damgası nasıl eklenir: Çalışma Sayfası Değiştiğinde

Aşağıdaki VBA kodu, A sütununun karşılık gelen hücrelerinde değişiklikler algıladığında B sütununun hücrelerine bir zaman damgası ekleyecektir :

Özel Alt Worksheet_SelectionChange(ByVal Target As Range) Eğer Target.Column = 1 Ve Target.Value <> "" ise, Application.EnableEvents = False Target.Offset(0, 1) = Format(Now(), "gg-aa-yyyy) ss:dd:ss") Application.EnableEvents = True End If End Sub

VBA kod düzenleyicisini açmak için ilk yöntemde belirtilen adımları izleyin. Şimdi, çalışma sayfası değişiklikleri izlemeyi etkinleştirmek için VBAProject (Kitap1) menüsü altındaki Sayfa1(Sayfa1) üzerine çift tıklayın.

Kod düzenleyici , sol taraftaki açılır listede Worksheet'i ve sağ taraftaki açılır menüde SelectionChange'i göstermelidir . Şimdi yukarıdaki VBA kodunu kopyalayıp yapıştırabilirsiniz. İşiniz bittiğinde, dosyayı Makro özellikli bir Excel çalışma kitabı olarak kaydetmeyi unutmayın.

Bu Makroyu her çalıştırdığınızda, A sütununa bir şey yazarsanız, Excel otomatik olarak B sütununa bir zaman damgası ekler . Ayrıca, VBA komut dosyasını eklemek için önceki yöntemde belirtilen adımları izleyerek Makroyu QAT'a ekleyebilirsiniz.

Son sözler

Artık Excel VBA kod düzenleyicisini yukarıda belirtilen VBA zaman damgası kodlarıyla nasıl kullanacağınızı bildiğinize göre, istediğiniz zaman zaman damgalarını otomatik olarak eklemek için Excel çalışma kitabınızı değiştirmeye başlayabilirsiniz.

Ancak, geri alma kısayol tuşuna basarsanız, Excel çalışma sayfanızda bir VBA kodu yürüterek yaptığınız değişiklikler kaybolmaz. Bu nedenle, bu basit VBA komut dosyalarını uygulamadan önce yedek kopyalar oluşturun. Excel VBA ayrıca diğer harika işlevleri de gerçekleştirebilir; örneğin, VBA'yı Microsoft Excel'e satır eklemek için kullanabilirsiniz.