+- AccessTr.neT (https://accesstr.net)
+-- Forum: Microsoft Access (https://accesstr.net/forum-microsoft-access.html)
+--- Forum: Access Cevaplanmış Soruları (https://accesstr.net/forum-access-cevaplanmis-sorulari.html)
+--- Konu Başlığı: VBA ile Dsum, DLookUp (/konu-vba-ile-dsum-dlookup.html)
VBA ile Dsum, DLookUp - temre - 03/06/2010
İyi akşamlar.
Liste görünümündeki bir formumda 6 sütunumun değerlerini aşağıdaki formüller ile hesaplatıyorum.
A=DSum ("Miktar";"T07_UEM";"TopluİşNumarası&MaddeNumarası&Konfigürasyon&Revizyon='" & [SatışSiparişi] & [MaddeNumarası] & [Konfigürasyon] & [Revizyon] & "'")
B=DSum("FizikselStok";"T09_STK";"TopluİşNumarası&MaddeNumarası&Konfigürasyon&Revizyon='" & [SatışSiparişi] & [MaddeNumarası] & [Konfigürasyon] & [Revizyon] & "'")
C=DSum("Miktar";"T07_UEM";"MaddeNumarası&Konfigürasyon&Revizyon='" & [MaddeNumarası] & [Konfigürasyon] & [Revizyon] & "'")
D=DSum("FizikselStok";"T09_STK";"MaddeNumarası&Konfigürasyon&Revizyon='" & [MaddeNumarası] & [Konfigürasyon] & [Revizyon] & "'")
E=DLookUp("Fiilitarih";"T12_HRK";"Topluişnumarası&Maddenumarası&Konfigürasyon&Revizyon='" & [Satış siparişi] & [Madde numarası] & [Konfigürasyon] & [Revizyon] & "'")
F=DLookUp("Fiilitarih";"T12_HRK";"Numara&Maddenumarası&Konfigürasyon&Revizyon='" & [Satış siparişi] & [Madde numarası] & [Konfigürasyon] & [Revizyon] & "'")
Soru: Bu formüllerimin verdiği değerleri Vba ile nasıl yazabilirim?
NOT: Umarım eklenti olmadığı için uyarı almam
dosya o kadar büyük ki... bu şekilde bir cevap alabilirsem düzenleme ile birlikte örneğimi paylaşacağım.Selamlar.
Cvp: VBA ile Dsum, DLookUp - POWER - 03/06/2010
Sn Temre , dosyayı biraz küçültüp örnek eklersen belki yeni çağrışımlarla birlikte geri dönebilirim.
Cvp: VBA ile Dsum, DLookUp - temre - 03/06/2010
hemen hazırlıyorum
Sn. horozufuk, ilginize teşekkür ediyorum. Dosya ektedir.
Selamlar.
Afedersiniz,
Açıklama gereği duydum... "Form2" yi açarken T09_STK.Ambar parametresini "OK" ile geçiniz
Cvp: VBA ile Dsum, DLookUp - POWER - 03/06/2010
Sn Temre bende 2007 yok 2003 e dönüştürebilirmisin ? Veya sitede bulunan arkadaşlar ekteki dosyayı 2003 e dönüştürebilirmisiniz.
Cvp: VBA ile Dsum, DLookUp - temre - 03/06/2010
Ups ! tabii ki... unuttum - kusura bakmayın; hallediyorum.
Geeeeldiii
Cvp: VBA ile Dsum, DLookUp - POWER - 03/06/2010
Dosya bozuk uyarısı alıyorum tekrar rar yapıp yeniden yüklermisin. Çok sürpriz bir dosya herhalde.