• DİKKAT

    DOSYA İndirmek/Yüklemek için ÜCRETLİ ALTIN ÜYELİK Gereklidir!
    Altın Üyelik Hakkında Bilgi

Açıklama ekleye tarih saat getirme

Katılım
8 Aralık 2010
Mesajlar
36
Excel Vers. ve Dili
excel 2010
Sizler için çok basittir ama uzun uğraşlar neticesiz kaldı ,açıklama eklemeye kayıt eetiğim tarih saati nasıl ekleyebilirim ???
 

Ekli dosyalar

Açıklama içine tarih ve saat eklemek mi istiyorsunuz ?
 
Sizler için çok basittir ama uzun uğraşlar neticesiz kaldı ,açıklama eklemeye kayıt eetiğim tarih saati nasıl ekleyebilirim ???

Merhaba
Sayfanın kod bölümüne kopyalayın ve deneyin.
Kod:
Option Explicit
Private Sub Worksheet_Change(ByVal Target As Range)
If Intersect(Target, Range("C13")) Is Nothing Then Exit Sub
Target.Comment.Text Text:="berrasultan:" & Chr(10) & Now
End Sub
 
üstad teşekkürler,zekana sağlık

bi sorumdaha olcaktı .makrolara epey uzağım ,c3 değilde tüm sayfaya nasıl uygulayabilirim.
 
Merhaba
Çözümü buldum
Sayfanın kod bölümündeki kodu bununla değiştirin.
Kod:
Option Explicit
Private Sub Worksheet_Change(ByVal Target As Range)
Target.AddComment
Target.Comment.Visible = True
Target.Comment.Text Text:="berrasultan:" & Chr(10) & Now
End Sub
 
malesef

girişte herhangibir tarih saat getirmiyor .silerken hata vermekte
 
girişte herhangibir tarih saat getirmiyor .silerken hata vermekte

Merhaba
Sayfanın kod bölümüne kopyalayın ve deneyin.
Kod:
Option Explicit
Private Sub Worksheet_Change(ByVal Target As Range)
If Target <> "" Then
Target.AddComment
Target.Comment.Visible = True
Target.Comment.Text Text:="berrasultan:" & Chr(10) & Now
End If
End Sub
 
Geri
Üst