KutoolsforOffice — Tek çözüm, beş güçlü araç.Daha az çabayla daha fazlasını başarmak.

Excel'de bir hücreye çift tıklayarak geçerli tarih ve saati otomatik olarak nasıl girersiniz?

YazarSiluvia Değiştirme Tarihi

Excel hücrelerine sık sık geçerli tarihi veya tarih ve saati girmek — özellikle günlük kayıtlar tutarken, ilerleme takibi yaparken ya da programları yönetirken — tekrarlı ve zaman alıcı bir görev haline gelebilir. Tarihi her seferinde elle yazmak yalnızca verimsiz kalmaz, aynı zamanda hatalara da yol açabilir. Bu makale, bu zorluğu aşmak için pratik bir çözüm sunar: Çalışma sayfanızdaki herhangi bir sınırlı aralıktaki hücreye basitçe çift tıklayarak geçerli tarihi veya tarih/saati otomatik olarak ekleyin. Aşağıdaki çözümleri uygulayarak iş akışınızı hızlandırabilir ve veri girişinde tutarlılık sağlayabilirsiniz.

VBA koduyla çift tıklayarak geçerli tarihi veya Tarih ve saat otomatik olarak ekleme/girme


VBA koduyla çift tıklayarak geçerli tarihi veya Tarih ve saat otomatik olarak ekleme/girme

Yalnızca bir hücreye çift tıklayarak geçerli tarihi veya tarih ve saati eklemek istiyorsanız, bunu kısa ve etkili bir VBA koduyla kolayca gerçekleştirebilirsiniz. Bu yöntem, formlar, devamsızlık çizelgeleri ya da tarihlerin hızlı ve doğru şekilde kaydedilmesi gereken diğer senaryolarda çalışan kullanıcılar için idealdir. VBA çözümü, belirli bir hücre aralığını hedeflemenize olanak tanır ve çift tıklama anında güncellemeler otomatik olarak gerçekleşir.

1. Çalışma sayfanızda, bu özelliğin uygulanmasını istediğiniz sayfanın alt kısmındaki sekmede sağ tıklayın. Ardından görüntülenen menüden Kodu Görüntüle seçeneğini seçin. Bu işlem yalnızca ilgili çalışma sayfası için Visual Basic Düzenleyicisini açar; kod yalnızca bu sayfaya uygulanacağı için doğru sayfayı düzenlediğinizden emin olun.

2. Microsoft Visual Basic for Applications penceresinde, aşağıdaki VBA kodunu Sayfa Kodu penceresine kopyalayıp yapıştırın.

VBA kodu: Bir hücreye çift tıklayarak geçerli tarihi ekleme

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
    If Not Intersect(Target, Range("A1:B10")) Is Nothing Then
        Cancel = True
        Target.Formula = Date
    End If
End Sub

Notlar:

1. Koddaki A1:B10aralığı, çift tıklama ile tarihin otomatik olarak ekleneceği hücre grubunu belirtir. Bu aralığı çalışma sayfanızın veri düzenine ve operasyonel ihtiyaçlarınıza göre ayarlayabilirsiniz.
2. Varsayılan olarak kod geçerli tarihi girer. Tarih ve saatin ikisini birden eklemek için kodda Dateifadesini Now()ile değiştirin. Bu özelleştirme, çift tıklama anında hem tarih hem de saatin tam olarak eklendiğini garanti eder.

Kodu Görüntüle'ye tıklayın ve kodu modüle ekleyin

Pratik ipucu: Belirlenen aralığın dışındaki bir hücreye çift tıklamak, tarih ekleme işlemini tetiklemez; hedef hücrelerinizin bu aralıkta olduğundan emin olun.

Hata Uyarısı: Kodun beklenen şekilde çalışmadığını fark ederseniz, kodu standart bir modüle değil, doğru çalışma sayfasına girdiğinizden ve Excel ortamınızda makroların etkin olduğundan emin olun. Güvenlik ayarları makro kullanımını engelliyorsa, bunları değiştirmek için Dosya > Seçenekler > Güven Merkezi > Güven Merkezi Ayarları yolunu izleyin.

3. Kodu girdikten sonra, Alt+Q tuşlarına birlikte basarak Microsoft Visual Basic for Applications penceresini kapatın ve çalışma sayfanıza dönün. Böylece düzenleyicide yaptığınız tüm değişiklikler kaydedilmiş olur.

Artık belirli bir aralıkta (örneğin,)A1:B10) herhangi bir hücreye çift tıkladığınızda, Excel bu hücreye kullandığınız koda göre otomatik olarak geçerli tarihi veya tarih ve saati yerleştirecektir. Bu basit otomasyon, zamanı kaydetmeyi ve tutarlı kayıt tutmayı kolaylaştırır.

kutools for excel ai ekran görüntüsü

KUTOOLS AI ile Excel'in Sihirli Gücünü Açığa Çıkarın

  • Akıllı Yürütme: Hücre işlemlerini gerçekleştirin, verileri analiz edin ve hepsi basit komutlarla çalışan grafikler oluşturun.
  • Özel formüller: İş akışlarınızı kolaylaştırmak için özelleştirilmiş formüller oluşturun.
  • VBA Kodlama: VBA kodlarını zahmetsizce yazın ve uygulayın.
  • Formül Yorumlama: Karmaşık formülleri kolayca çözmek artık çok daha basit!
  • Metin Çevirisi: Elektronik tablolarınızda dil bariyerlerini aşın.
Excel yeteneklerinizi yapay zekâ destekli araçlarla geliştirin.Şimdi İndirinve hiç deneyemediğiniz bir verimlilik yaşayın!

İlgili makaleler:

En İyi Office Üretkenlik Araçları

🤖KUTOOLS AI Yardımcısı: Şunu temel alarak Veri Analizi’i devrimleştirin:Akıllı Yürütme   |  Kod Oluştur|  özel formüller Oluştur  |  Verileri Analiz Et ve Grafikler Oluştur|  Geliştirilmiş İşlevler Çağır…
Popüler Özellikler:Bul, Vurgula veya Yinelenenleri İşaretle   |  Boş Satırları Sil   |  Veri Kaybetmeden Sütunları Birleştir veya Hücreleri   |   Formül kullanmadan yuvarlama…
Süper ARA:Çoklu Kriterli Dikey Arama (VLookup)  |  Çoklu Değerli Dikey Arama (VLookup)  |   Birden Fazla Sayfada Dikey Arama (VLookup)   |   Bulanık Eşleme…
Gelişmiş Açılır Liste:Açılır Liste Hızlıca Oluştur   |  Bağımlı Açılır Liste   |  Çoklu Seçimli Açılır Liste…
Sütun Yöneticisi:Belirli Sayıda Sütun Ekle|Sütunları Taşı|Gizli Sütunların Görünürlük Durumunu Aç/Kapat|Aralıkları ve Sütunları Karşılaştır…
Öne Çıkan Özellikler:Izgara Odaklama   |  Tasarım Görünümü   |Gelişmiş formül çubuğu   | Çalışma Kitabı ve Sayfa Yöneticisi   |  Kaynaklar(Otomatik Metin)|  Tarih Seçici   |  Çalışma Sayfalarını Birleştir  |  Şifrele/Hücreleri Şifre Çöz   | Listeye Göre E-posta Gönder   |  Süper Filtre   |   Özel Filtre(Kalın Yazılı Hücreleri Filtrele/italik/üstü çizili…) …
En Çok Kullanılan 15 Araç Setleri:12 MetinAraçları(Metin Ekle,Belirli Karakterleri Sil, …)|   50+GrafikTürleri(Gantt Grafiği, …)|   40+ Pratik Formüller(Doğum tarihine dayanarak yaş hesapla, …)|   19 EklemeAraçları(QR Kodu Ekle,Yoldan Resim Ekle, …)|   12 DönüştürmeAraçları(Kelimeye Dönüştür,Döviz Kuru Dönüşümü, …)|   7 Birleştir ve AyırAraçları(Gelişmiş Satırları Birleştir,Hücreleri Böl, …)|… ve daha fazlası
Kutools'u tercih ettiğiniz dilde kullanın – İngilizce, İspanyolca, Almanca, Fransızca, Çince ve 40+ başka dillerde de desteklenir!

Excel becerilerinizi Kutools for Excel ile geliştirin ve verimlilikte hiç yaşamadığınız bir deneyim yaşayın.Kutools for Excel, üretkenliği artırmak ve Zamanı Kaydet için 300’den fazla gelişmiş özelliğe sahiptir.İhtiyacınız olan özelliği hemen edinmek için buraya tıklayın…


Office Tab, Office uygulamalarına sekmeli bir arayüz kazandırarak işlerinizi çok daha kolay hale getirir.

  • Word, Excel, PowerPoint, Publisher, Access, Visio ve Project'te sekmeli düzenleme ve okuma özelliğini etkinleştirin.
  • Belgeleri yeni pencerelerde değil, aynı pencerenin yeni sekmelerinde açıp oluşturun.
  • Günlük üretkenliğinizi %50 artırır ve her gün yüzlerce fare tıklamasından tasarruf etmenizi sağlar!

Tüm Kutools eklentileri — tek bir kurulum dosyasında!

Kutools for Office paketi, Excel, Word, Outlook ve PowerPoint eklentilerini ve ayrıca Office Tab Pro’yu içeren kapsamlı bir çözümdür; Office uygulamalarında çalışan ekipler için idealdir.

ExcelWordOutlookTabsPowerPoint
  • Hepsi bir arada paket— Excel, Word, Outlook ve PowerPoint eklentileri + Office Tab Pro
  • Tek kurulum, tek lisans— birkaç dakikada hazır (MSI uyumlu)
  • Birlikte daha iyi çalışır— Office uygulamalarında akıcı üretkenlik
  • 30 günlük tam özellikli deneme— kayıt gerekmez, kredi kartı gerekmez
  • En iyi fiyat performans— ayrı ayrı eklenti satın almaya göre tasarruf sağlar