Anasayfaya Yazılan Verileri İlgili Sayfalara Aktarma

  • Konuyu başlatan Konuyu başlatan mcexrem
  • Başlangıç tarihi Başlangıç tarihi

mcexrem

Kullanıcı
Katılım
17 Nis 2021
Mesajlar
388
Excel Versiyonu
Excel 2016
Excel Sürümü
64 Bit
Excel Dili
Türkçe
Merhabalar

Dosyamın ANASAYFA sayfasına ödemeleri tarihine göre kaydediyorum.
ANASAYFA'ya kaydettiğim verileri ilgili aylara aktarması mümkün mü acaba? Bunu da yaparken butonsuz bir şekilde yapmak mümkün mü yani veriyi tarihi ile girince hemen diğer sayfaya aktaması konusunda yardımcı olur musunuz?

Dosyaları hem boş olarak hem de şuanki güncel halini ekledim.

Yardımlarınız için teşekkür eder saygılar sunarım.
 
Kaydederken dosya özelliklerinden kişisel bilgileri kaldır
Silme işleminde for each uyarısı
Silme işleminde for each uyarısı

Ekli dosyalar

Tarihe göre sırala Oylamaya göre sırala
Merhabalar Sn. @mc_exrem
-- Anasayfa isimli sekmenin kod bölümüne aşağıdaki kodları ekleyiniz.
-- Diğer sayfalardan giriş yaparken kullandığınız Kenarlık koduna bu şekilde ihtiyaç kalmayacak. Bu nedenle ThisWorkbook (BuÇalışmaKitabı) içindeki kodları da pasif yapınız.
VBA: 
İndirmek için giriş yapmanız gerekmektedir.
(26 satır)
 
Oyla 0 Olumsuz oyla
Düzeltme:
Çok pardon, ThisWorkbook'daki kodları sildim.
Aktarmayı yapıyor ancak sadece E sütunundaki tutarı aktarmıyor?
 
Oyla 0 Olumsuz oyla
Kodları eklediğiniz dosyayı paylaşır mısınız?
İlk mesajdaki dosyanıza göre hazırladım ve A ile E arasındaki hücreleri tam aktarıyor.
 
Oyla 0 Olumsuz oyla
Bir düzeltme de ben yazayım. :)

Öncelikle eksik anlatım yaptığım için Özür dilerim.
İş yerinde fırsat buldukça baktığımdan dolayı şimdi fark ettim eksikliği.

AnaSayfa'da veri girişi yaparken En Son Tarih hücresine veri girişi yapınız.

If Target.Column <> 4 ifadesi ile 4. sütuna veri girişi yapıldığı zaman kodlar çalışır.
Bu nedenle önce tarihi yazarsanız, veri girişi yapılmayan hücreler boş olarak aktarılır.
 
Oyla 0 Olumsuz oyla
En son Tutar bilgisi giriyorsanız da aşağıdaki kodları kullanabilirsiniz.
VBA: 
İndirmek için giriş yapmanız gerekmektedir.
(26 satır)
 
Oyla 0 Olumsuz oyla
Yanıt için giriş yapmanız veya üye olmanız gerekir.
Benzer Konular Popüler İçerikler Daha Fazlası
Geri
Üst Alt