Merhaba.
Ekteki örneğimde Query2 de toplam miktar sütununda boş olan kısımlara rakamların gelmesi için ne yapmalıyım?

Teşekkürler.

[/code]
Sub Düğme1_Tıklat()
For Dyn h In Range("a1:h5")
If h = 5 Then
topla = h.Value + topla
End If
Next
[a7] = topla
End Sub
Bu kodu denermisniz.

Sorgunun SQL'ini;

SELECT Query1.md, Query1.kn, Query1.rv, Sum(Table1.miktar) AS SumOfmiktar

FROM Query1 RIGHT JOIN Table1 ON (Query1.md = Table1.md) AND (Query1.kn = Table1.kn) AND (Query1.rv = Table1.rv)

GROUP BY Query1.md, Query1.kn, Query1.rv;

olarak değiştirin.

Benim için yeni örnek, teşekkürler sayın Ercan Şahin...

Sevgi ve saygılar..

Ercan hocam ilginize teşekkür ederim. Olması gereken sonuç tablosu ortaya bu şekilde çıkmadı.

Saygılar.

Sn temre; oluşması gereken halini Excel ile bize gösterebilirmisiniz. Ona göre üzerinde çalışalım.