Tarihle ilgili :yardim:

Katılım
11 Ocak 2007
Mesajlar
28
Excel Vers. ve Dili
Excel 2003 Türkçe
Arkadaşlar yardımcı olursanız sevinirim;örnekteki tabloda herhangi bir satırda bir malzeme yazdığımda tarih kısmında aynı satırın hizasına o günün tarihi gelse böyle bir şey mümkünmü,eğer mümkünse nasıl yapabilirim yardımcı olursanız sevinirim.
 

Merhum İdris SERDAR

Moderatör
Yönetici
Katılım
21 Ekim 2005
Mesajlar
17,094
Excel Vers. ve Dili
Excel, 365 - İngilizce
K9 hücresine;


=IF(C9="";"";TODAY())

formülünü yazıp, aşağıya doğru kopyalayın.


.
 
Katılım
11 Ocak 2007
Mesajlar
28
Excel Vers. ve Dili
Excel 2003 Türkçe
Yardımların için teşekkürler fakat bu tarih ben o satıra bir şey yazdıktan sonra değişiyor mu?Değişiyorsa değişmemesi için ne yapabilirim.
 

mehmett

Altın Üye
Katılım
18 Mayıs 2005
Mesajlar
2,571
Excel Vers. ve Dili
Excel 2010 Türkçe
Dediğiniz özellik fonksiyon ile de yapılabilir ancak tarihlerin kalıcı olması için makroyla yapılması gerekir. Dosyanız ekte.

Private Sub Worksheet_Change(ByVal Target As Range)
If Intersect(Target, [C9:C52]) Is Nothing Then Exit Sub
satır = Target.Row
Cells(satır, 11) = Date
End Sub
 

Orion1

Uzman
Uzman
Katılım
1 Mart 2005
Mesajlar
22,254
Excel Vers. ve Dili
Win7 Home Basic TR 64 Bit

Ofis-2010-TR 32 Bit
Merhaba.
Sayfanın kod bölümüne aşığdaki kodları Kopyalayıp yapıştırıp deneyiniz.:cool:
Kod:
Private Sub Worksheet_Change(ByVal Target As Range)
On Error GoTo hata
If Intersect(Target, [C9:C59]) Is Nothing Then Exit Sub
If Target.Value <> "" Then
    Cells(Target.Row, "K").Value = CDate(Date)
    Cells(Target.Row, "K").NumberFormat = "dd.mm.yyyy"
    Else
    Cells(Target.Row, "K").Value = ""
End If
hata:
End Sub
Not:
Say&#305;n mehmett cevab&#305; vermi&#351; .G&#246;remedim.
 
Katılım
11 Ocak 2007
Mesajlar
28
Excel Vers. ve Dili
Excel 2003 Türkçe
Sayın Mehmet gönderdiğiniz dosyada denedim olmadı.Ben Türkçe excel yüklemiştim forumda ingilizce olarak gözüküyor.Ondan kaynaklanabilir mi
 

mehmett

Altın Üye
Katılım
18 Mayıs 2005
Mesajlar
2,571
Excel Vers. ve Dili
Excel 2010 Türkçe
Sn speedy 61

G&#246;nderdi&#287;im dosyada Mal&#305;n Cinsi s&#252;tununda malzeme ad&#305; yaz&#305;nca Tarih s&#252;tununda g&#252;n&#252;n tarihi gelecek.
 
Katılım
11 Ocak 2007
Mesajlar
28
Excel Vers. ve Dili
Excel 2003 Türkçe
Sn Mehmet rahatsız ediyorum ama her zaman malın cinsi kısmına yazı yazmıyoruz bazen de kod kısmına malın kodunu yazıyoruz otomatik olarak adı çıkıyor zaten o kodlu tabloyu da siz yapmıştınız.Kod kısmına da uygulayabilirmisiniz aynı işlemi.Yardımlarınız için teşekkürler.
 

mehmett

Altın Üye
Katılım
18 Mayıs 2005
Mesajlar
2,571
Excel Vers. ve Dili
Excel 2010 Türkçe
Kodda a&#351;a&#287;&#305;daki de&#287;i&#351;ikli&#287;i yap&#305;n&#305;z.

If Intersect(Target, [B9:B52]) Is Nothing Then Exit Sub
 

Necdet

Moderatör
Yönetici
Katılım
4 Haziran 2005
Mesajlar
15,372
Excel Vers. ve Dili
Ofis 365 Türkçe
Say&#305;n mehmet beyin yapt&#305;&#287;&#305; kodda

If Intersect(Target, [B9:C52]) Is Nothing Then Exit Sub

olarak de&#287;i&#351;tirin. Yani C9 u B9 yap&#305;n&#305;z
 
Üst