Kullanıcı
- Katılım
- 8 Mar 2021
- Mesajlar
- 315
- Excel Versiyonu
- Excel 2016
- Excel Sürümü
- 64 Bit
- Excel Dili
- Türkçe
Excel de hücreye veri girişinde yandaki hücreye otomatik tarih atmasını istiyorum.
Hücreye veri girilince sağ tarafa
- Konuyu başlatan cahan2010
- Başlangıç tarihi
- Katılım
- 24 Kas 2016
- Mesajlar
- 6,331
[REACTS=1,2,10,9]
[/REACTS]
En basit hali...
Bir hücreye bir şeyler yazarsınız ve Enter tuşuna basarsınız, sonrasında aktif haldeki hücrenin 1 üst hücresinde değer varsa, 1 üst sağ hücresine tarih yazar.
Kriterler vs ile geliştirilebilir.
Kod:
İndirmek için giriş yapmanız gerekmektedir.
(3 satır)En basit hali...
Bir hücreye bir şeyler yazarsınız ve Enter tuşuna basarsınız, sonrasında aktif haldeki hücrenin 1 üst hücresinde değer varsa, 1 üst sağ hücresine tarih yazar.
Kriterler vs ile geliştirilebilir.
Kullanıcı
- Katılım
- 28 Tem 2022
- Mesajlar
- 887
Kod:
İndirmek için giriş yapmanız gerekmektedir.
(2 satır)Bu satırları sayfanızdaki kodlara ekleyerek deneyin.
Kullanıcı
- Katılım
- 8 Mar 2021
- Mesajlar
- 315
Bu formülü ilgili yere girdim. Ama istediğim olmadı.
- Katılım
- 24 Kas 2016
- Mesajlar
- 6,331
[REACTS=1,2,10,9]
[/REACTS]
Üstteki kodlar sayfanızdaki Worksheet_Change(ByVal Target As Excel.Range) prosedürünün ilk satırına yazın.
Sonraki kodlarınızın işlevini bilmediğim için dikkate almıyorum.
Kod:
İndirmek için giriş yapmanız gerekmektedir.
(3 satır)Üstteki kodlar sayfanızdaki Worksheet_Change(ByVal Target As Excel.Range) prosedürünün ilk satırına yazın.
Sonraki kodlarınızın işlevini bilmediğim için dikkate almıyorum.
Kullanıcı
- Katılım
- 28 Tem 2022
- Mesajlar
- 887
1 nolu mesajınızdaki örneğe göre, oluyor.
Kullanıcı
- Katılım
- 8 Mar 2021
- Mesajlar
- 315
İlk mesajımdaki tek hücreye girişti, çalışıyordu. İstediğim 5 hücreye 1 veya X değeri girdiğim zaman tarihi yazması.
Bu kod çalışmasını sağlıyordu,
wird im definierten Bereich ein Wert geändert, wird in der nächsten Spalte das Datum eingetragen "
"Tanımlanan alanda bir değer değiştirilirse sonraki sütuna tarih girilir. demekte.
Bur da ki kodun karşılığını bulabilirsem sorunu çözerim.
- Katılım
- 24 Kas 2016
- Mesajlar
- 6,331
Verdiğim son kod sorunsuz çalışıyor @cahan2010
Kullanıcı
- Katılım
- 8 Mar 2021
- Mesajlar
- 315
Üstadım. 1. örnekte tek hücreye yazdığımda yan tarafa otomatik tarihi yazıyordu.
Benim isteğim; J-K-L-M-N hücrelerine veri girince kayıt tarihi başlıklı P2 hücresine tarihi atmasını istiyorum.
- Katılım
- 24 Kas 2016
- Mesajlar
- 6,331
Ben sarı alanlara değer yazınca yanına tarih yazsın kısmını yapmışım, haklısınız hatalı okumuşum.
Bakacağım tekrar.
Bakacağım tekrar.
- Katılım
- 24 Kas 2016
- Mesajlar
- 6,331
[REACTS=1,2,10,9]
[/REACTS]Daha kısa da çözümü olabilir ama aklıma ilk gelen bu oldu.
Excel'de en kaçındığım şeylerdir bu tür işlemlerde
Kod:
İndirmek için giriş yapmanız gerekmektedir.
(5 satır)Excel'de en kaçındığım şeylerdir bu tür işlemlerde
- Katılım
- 11 Nis 2019
- Mesajlar
- 9,667
@cahan2010
İsteği yanlış anlamış da olabilirim.
Alternatif bir cevap vereyim dedim.
İşlem yapılan satırda (işlemden kastım yazma/silme) ;
-- J-N sütun aralığında, yazma/işlemleri sonucunda hiç veri kalmamışsa, ilgili satır P sütunu hücre içeriği silinir,
-- J-N sütun aralığında bir hücreye veri yazıldığında da tarih yazılır.
Bu arada diyelim J3'e bir şey yazdınız ve P sütununa tarih yazıldı,
yarın aynı satırda J-N hücrelerinden birinde işlem yapılırsa bu kez P sütunundaki tarih yarının tarihi olarak değiştirilecektir.
Sonradan eklediğim not: Bu değişiklik istenilmiyorsa koddaki Cells(Target.Row, 16) = Date satırını
If Cells(Target.Row, 16)="" Then Cells(Target.Row, 16) = Date olarak değiştirin.
İsteği yanlış anlamış da olabilirim.
Alternatif bir cevap vereyim dedim.
İşlem yapılan satırda (işlemden kastım yazma/silme) ;
-- J-N sütun aralığında, yazma/işlemleri sonucunda hiç veri kalmamışsa, ilgili satır P sütunu hücre içeriği silinir,
-- J-N sütun aralığında bir hücreye veri yazıldığında da tarih yazılır.
Bu arada diyelim J3'e bir şey yazdınız ve P sütununa tarih yazıldı,
yarın aynı satırda J-N hücrelerinden birinde işlem yapılırsa bu kez P sütunundaki tarih yarının tarihi olarak değiştirilecektir.
Sonradan eklediğim not: Bu değişiklik istenilmiyorsa koddaki Cells(Target.Row, 16) = Date satırını
If Cells(Target.Row, 16)="" Then Cells(Target.Row, 16) = Date olarak değiştirin.
VBA:
İndirmek için giriş yapmanız gerekmektedir.
(6 satır)Kullanıcı
- Katılım
- 8 Mar 2021
- Mesajlar
- 315
Üstadım iyi akşamlar.
Bura tamam
-- J-N sütun aralığında, yazma/işlemleri sonucunda hiç veri kalmamışsa, ilgili satır P sütunu hücre içeriği silinir,
Burada sorun var
-- J-N sütun aralığında bir hücreye veri yazıldığında da tarih yazılır. J-N hücre aralığında bütün hücreler değer alması (1 veya X değeri) ve dolu olması gerekir.
Bura tamam
-- J-N sütun aralığında, yazma/işlemleri sonucunda hiç veri kalmamışsa, ilgili satır P sütunu hücre içeriği silinir,
Burada sorun var
-- J-N sütun aralığında bir hücreye veri yazıldığında da tarih yazılır. J-N hücre aralığında bütün hücreler değer alması (1 veya X değeri) ve dolu olması gerekir.
Benzer Konular
Popüler İçerikler
Daha Fazlası