• DİKKAT !

    Forum içeriğine ve tüm hizmetlerimize erişim sağlamak için foruma kayıt olmalı ya da giriş yapmalısınız. Foruma üye olmak Dosya Yükleme tamamen ücretsizdir.

Çözüldü Sayfalar Arası Veri Aktarımında Hedef Düzeltme

Bu konu çözüldü olarak işaretlenmiştir. Çözülmediğini düşünüyorsanız konuyu rapor edebilirsiniz.
Durum
Konu Çözümlendiği İçin Kapatılmıştır.

mcexrem

Gold Üye
Katılım
22 Nis 2022
Mesajlar
725
Çözümler
2
Aldığı beğeni
132
Excel V
Office 2019 TR
Gold Bitiş
15 Nisan 2026
Konu Sahibi
Merhabalar üstadlarım,

siz değerli hocalarımın sayesinde dosyamı verimli bir şekilde kullanıyorum ancak;

MAAŞ ÖDEME LİSTESİ sayfası D sütunundaki verileri HALKBANK G sütununa ve EFT LİSTESİ D sütunlarına aktarırken D sütunu yerine I sütunundaki verileri aktardığını tespit ettim.

Yardımlarınız için teşekkür eder saygılar sunarım.
 
Çözüm
MAAŞ_ODEME_LISTESİ sayfasında AVANS 1, AVANS 2, AVANS 3 boş olduğunda
aynı sayfada D sütunundaki veriler ile I sütunundaki veriler aynı.
Sayfaya yazmış olduğunuz formüllere bakılınca zaten öyle olması gerekiyor.
Karışıklık muhtemelen bundan kaynaklanıyor.
MAAŞ_ODEME_LISTESİ sayfasındaki Düğmeye sadece
MAAS_ODEME_LISTESI_Avanslari_Yapistir makrosunu eklemişsiniz.
Bu makro E:G sütunlarını silince değerleriniz eşitleniyor.

eftlistesine makrosunu BORDRO_ISLEMLERI makrosunun içinde kullanmışsınız.
Başka bir yerde kullanılmış görünmüyor.
BORDRO_ISLEMLERI makrosu sizin projenizin omurgası görünüyor. Temel makro bu gibi.
Burdan da dağıtım yapıyorsunuz.
Bu kodlarda AVANS bilgilerinin nasıl doldurulduğuna dair bir kod göremedim...
Konu Sahibi
günaydınlar,

açıklamada mı bir eksiklik var acaba?
 
Konu Sahibi
HTML:
Kod:
İçeriği görebilmek için Giriş yap ya da Üye ol.

halk.Cells(say, "I") = XD.Offset(0, -10): halk.Cells(say, "E") = XD.Offset(0, -6).Text...satırındaki "I"verisini "D" olarak düzeltince HALKBANK sayfasına aktarılacak veriler düzeldi ama EFT sayfasına aktarma verisini bulamadım. Yardımcı olur musunuz.
 
Konu Sahibi
Sub eftlistesine()
Set mol = Sheets("MAAS_ODEME_LISTESI"): Set ozl = Sheets("OZLUK_DOSYASI"): Set eft = Sheets("EFT LISTESI")
If ozl.AutoFilterMode Then ozl.AutoFilterMode = False
ozlson = ozl.Cells(Rows.Count, 2).End(3).Row
If eft.AutoFilterMode Then eft.AutoFilterMode = False
eft.Range("A2:F" & Rows.Count).ClearContents
say = 1
For Each EC In ozl.Range("L4:L" & ozlson)
If Mid(EC, 5, 5) <> "00012" Then
Set bul = mol.[B:B].Find(EC.Offset(0, -10), , xlValues, xlWhole)
If Not bul Is Nothing Then
If mol.Cells(bul.Row, "D") > 0 Then
say = say + 1
eft.Cells(say, "A") = EC.Offset(0, -10)
eft.Cells(say, "B") = EC.Offset(0, -9)
eft.Cells(say, "C") = EC.Text
eft.Cells(say, "D") = mol.Cells(bul.Row, "D")
eft.Cells(say, "E") = mol.Cells(1, "E") & " Maaş"
eft.Cells(say, "F") = say - 1
End If
End If
End If
Next
End Sub
EFT sayfası kodu bunlar doğru aktarıyor gördüğüm kadarı ile.
Toplam 134.126,49 olması gerekirken 140.683,93 şeklinde vermektedir çünki MAAŞ ÖDEME SAYFASI D sütunu yerine I sütunundaki verileri baz almaktadır. Bu yüzden hedefi değiştirmem gerekiyor.
 
MAAŞ_ODEME_LISTESİ sayfasında AVANS 1, AVANS 2, AVANS 3 boş olduğunda
aynı sayfada D sütunundaki veriler ile I sütunundaki veriler aynı.
Sayfaya yazmış olduğunuz formüllere bakılınca zaten öyle olması gerekiyor.
Karışıklık muhtemelen bundan kaynaklanıyor.
MAAŞ_ODEME_LISTESİ sayfasındaki Düğmeye sadece
MAAS_ODEME_LISTESI_Avanslari_Yapistir makrosunu eklemişsiniz.
Bu makro E:G sütunlarını silince değerleriniz eşitleniyor.

eftlistesine makrosunu BORDRO_ISLEMLERI makrosunun içinde kullanmışsınız.
Başka bir yerde kullanılmış görünmüyor.
BORDRO_ISLEMLERI makrosu sizin projenizin omurgası görünüyor. Temel makro bu gibi.
Burdan da dağıtım yapıyorsunuz.
Bu kodlarda AVANS bilgilerinin nasıl doldurulduğuna dair bir kod göremedim.
Sanırım manuel dolduruyorsunuz.
MAAŞ_ODEME_LISTESİ sayfasında AVANS bilgilerini doldurduğunuzda
eftlistesine makrosu doğru verileri aktarıyor.
Ben sırasıyla 10-20-30 yazıp aktardım. Sonucuda gördüm.
Bu makroda sorun görünmüyor.
 
Çözüm
Konu Sahibi
Öncelikle cümleme özür dileyerek baslamak istiyorum. Kodlar belirtildiği gibi çalışmaktadır ancak konuları ayrı ayrı açtığım için bir karışıklık oldu. Yarın konuyu toparlayıp net bir açıklama yapmak istiyorum.
 
Durum
Konu Çözümlendiği İçin Kapatılmıştır.
Geri
Üst