işlem yapılınca otomatik çalışan makro

Katılım
22 Haziran 2009
Mesajlar
165
Excel Vers. ve Dili
ofis 365
Değerli arkadaşlar sayfa1 de herhangi bir değişiklik yaptığımda a1 hücresinde tarih ve saatin otomatik olarak güncellenmesini istiyorum. yardımcı olursanız sevinirim
 

hamitcan

Uzman
Uzman
Katılım
1 Temmuz 2004
Mesajlar
7,737
Excel Vers. ve Dili
Excel 2019 Türkçe
Kod:
Private Sub Worksheet_Change(ByVal Target As Range)
[A1] = Now
End Sub
 
Katılım
22 Haziran 2009
Mesajlar
165
Excel Vers. ve Dili
ofis 365
sn hamitcan çok teşekkür ederim yanlız bir sorun var hücrelere tıkladığımda bile tarih değişiyor benim istediğim sadece birşey yazarken yada silerken makro çalışsın
 

hamitcan

Uzman
Uzman
Katılım
1 Temmuz 2004
Mesajlar
7,737
Excel Vers. ve Dili
Excel 2019 Türkçe
Galiba siz verdiğim kodu kullanmadınız.
 
Katılım
22 Haziran 2009
Mesajlar
165
Excel Vers. ve Dili
ofis 365
yok kullandım ama sizin verdiğiniz kodda bir hücre içine tıklasam ve hiç birşey yazmasam bile saat güncelleniyor benim istediğim sadece birşeyler yazdığım veya sildiğim zaman tarih ve saat güncelleşsin
 

hamitcan

Uzman
Uzman
Katılım
1 Temmuz 2004
Mesajlar
7,737
Excel Vers. ve Dili
Excel 2019 Türkçe
Bahsettiğiniz durum,
Kod:
Worksheet_SelectionChange
olayında gerçekleşir, oysa ki verdiğim kod da bu durum
Kod:
Worksheet_Change
sadece bir hücrede değişiklik olduğunda oluşur.
 
Katılım
22 Haziran 2009
Mesajlar
165
Excel Vers. ve Dili
ofis 365
peki çalışma kitabının herhangi bir sayfasında değişiklik yapıldığında sayfa1 in a1 hücresindeki tarihin güncellenmesi için ne yapmak lazım
 

Korhan Ayhan

Administrator
Yönetici
Admin
Katılım
15 Mart 2005
Mesajlar
42,731
Excel Vers. ve Dili
Microsoft 365 Tr-En 64 Bit
Selamlar,

Çalışmanızın THISWORKBOOK bölümüne aşağıdaki kodu uygulayın.

Kod:
Option Explicit
 
Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)
    Sheets("Sayfa1").Range("A1").Value = Now
End Sub
Ayrıca excel sayfasına ait kodları ve ne işe yaradıklarını aşağıdaki linkten öğrenebilirsiniz.

http://www.excel.web.tr/showthread.php?t=57064
 
Katılım
22 Haziran 2009
Mesajlar
165
Excel Vers. ve Dili
ofis 365
Teşekkürler Korhan bey emeğinize sağlık
 
Üst