Skip to main content

Excel'de bir onay kutusu işaretlendiğinde bir hücreye tarih damgası nasıl eklenir?

Author: Siluvia Last Modified: 2025-06-10

Normalde, Excel'de tarih damgasını girmek için kısayol tuşlarını kullanırsınız. Peki ya Excel'de bir onay kutusu kullanarak bir hücreye tarih damgası eklemek istersek? Onay kutusunu işaretlediğinizde, tarih damgası belirlenmiş bir hücreye otomatik olarak eklenir. Bu makale size bunu çözmeye yardımcı olacaktır.

VBA kodu ile onay kutusu işaretlendiğinde bir hücreye tarih damgası ekleme


VBA kodu ile onay kutusu işaretlendiğinde bir hücreye tarih damgası ekleme

Bu bölüm, Excel'de bir onay kutusu işaretlendiğinde bir hücreye otomatik olarak tarih damgası eklemenize yardımcı olacak bir VBA betiği tanıtacaktır. Lütfen aşağıdaki adımları izleyin.

1. Bir onay kutusu ekledikten sonra, Microsoft Visual Basic for Applications penceresini açmak için Alt + F11 tuşlarına aynı anda basın.

2. Microsoft Visual Basic for Applications penceresinde, Ekle > Modül'e tıklayın. Ardından aşağıdaki VBA kodunu Modül penceresine kopyalayıp yapıştırın.

VBA kodu: Onay kutusu işaretlendiğinde bir hücreye tarih damgası ekleme

Sub CheckBox_Date_Stamp()
Dim xChk As CheckBox
Set xChk = ActiveSheet.CheckBoxes(Application.Caller)
With xChk.TopLeftCell.Offset(, 1)
    If xChk.Value = xlOff Then
        .Value = ""
    Else
       .Value = Date
    End If
End With
End Sub

3. Microsoft Visual Basic for Applications penceresini kapatmak için Alt + Q tuşlarına basın.

4. Onay kutusuna sağ tıklayın ve sağ tıklama menüsünden Makro Ata seçeneğini seçin. Ekran görüntüsüne bakın:

A screenshot showing the Assign Macro option for a checkbox

5. Makro Ata iletişim kutusunda, Makro adı kutusunda CheckBox_Date_Stamp'ı seçin ve ardından Tamam düğmesine tıklayın. Ekran görüntüsüne bakın:

A screenshot of the Assign Macro dialog box in Excel with the CheckBox_Date_Stamp macro selected

Onay kutusunu işaretlediğinizde, tarih damgası bitişik hücreye otomatik olarak eklenecektir.

A screenshot showing the date stamp inserted into an adjacent cell after ticking the checkbox


İlgili makaleler:

En İyi Ofis Verimlilik Araçları

🤖 Kutools AI Asistanı: Veri analizinde devrim yaratın: Akıllı Yürütme   |  Kod Oluştur  |  Özel Formüller Oluştur  |  Verileri Analiz Et ve Grafikler Oluştur  |  Geliştirilmiş İşlevleri Çağır
Popüler Özellikler: Yinelenenleri Bul, Vurgula veya İşaretle   |  Boş Satırları Sil   |  Sütunları veya Hücreleri Verileri Kaybetmeden Birleştir   |   Formül Olmadan Yuvarla ...
Süper ARA: Çok Kriterli Düşeyara    Çoklu Değer Düşeyara  |   Çoklu sayfa araması   |   Bulanık Eşleme ....
Gelişmiş Açılır Liste: Hızlıca Açılır Liste 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 Değiştir  |  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ı & Çalışma Sayfası Yöneticisi   |  Otomatik Metin Kütüphanesi (Auto Text)   |  Tarih Seçici   |  Veri Birleştir   |  Hücreleri Şifrele/Şifre Çöz    Listeye Göre E-posta Gönder   |  Süper Filtre   |   Özel Filtre (kalın/italik/üstü çizili filtrele...) ...
En İyi15 Araç Seti12 Metin Aracı (Metin Ekle, Belirli Karakterleri Sil, ...)   |   50+ Grafik Türü (Gantt Grafiği, ...)   |   40+ Pratik Formül (Doğum tarihine dayanarak yaş hesapla, ...)   |   19 Ekleme Aracı (QR Kodu Ekle, Yoldan Resim Ekle, ...)   |   12 Dönüşüm Aracı (Kelimeye Dönüştür, Para Birimi Dönüştürme, ...)   |   7 Birleştir & Böl Aracı (Gelişmiş Satırları Birleştir, Hücreleri Böl, ...)   |   ... ve daha fazlası

Kutools for Excel ile Excel becerilerinizi geliştirin ve daha önce hiç olmadığı kadar verimli olun. Kutools for Excel, üretkenliğinizi artırmak ve zamanınızı kaydetmek için300'den fazla gelişmiş özellik sunar.  En çok ihtiyacınız olan özelliği almak için buraya tıklayın...


Office Tab, Office'e sekmeli arayüz getirir ve işinizi çok daha kolaylaştırır

  • Word, Excel, PowerPoint'te sekmeli düzenleme ve okuma özelliğini etkinleştirin.
  • Aynı pencerenin yeni sekmelerinde birden fazla belge açın ve oluşturun, yeni pencerelerde değil.
  • Verimliliğinizi %50 artırır ve her gün yüzlerce fare tıklamasını azaltır!