(07/07/2010, 18:20)Taruz yazdı: Merhaba..

Dsum ile oluşturmanız gereken yapı bu olmalı..:

Dim x As String
x = Dsum ("[ADET]", "URUNHAREKETLERI", "[URUNADI] = '" & [Metin0] & "'" _
& " AND[GIRIS-CIKIS]='GIRIS' and [BÖLÜM]='DEPO'")
Me.Metin8 = x

Hatanız...: Eksik kriter ve metin kutusunu urunadı olarak tanımlamanızdan kaynaklı.. Kutunun adı metin0 ;)

Diğer uygulamak istediğiniz yöntem de Dlookup fonksiyonu ile olur.. Yukarıdaki yapının yerine bu kullanılabilir..:

Me.Metin8 = Dlookup ("toplaadet", "sorgu1")

İlk yöntem daha efektiftir..

sayın taruz hocam;
dsum işlevini exceldeki etopla fonksiyonu gibi satırlara göre toplamak için uyarlıyabiliyor muyuz?Forumdaki birçok örneğe baktım anladığım kadarıyla Dsum sutunlar için kullanılıyor.

Dsum komutu ile bir alanda yer alan istediğiniz kriterlere uyan kayıtları toplayabilirsiniz. Sizin yapmak istediğiniz birkaç farklı alandaki verileri toplamak ise örnek dosyanız ile yeni konu açarsanız yardımcı olmaya çalışırız.

Usta konu açılmıştır..