Çözüldü Excel vba ile accesden last kullanımı hakkında.

Dosyanızda module8 içerisine kodu yazdım. Tabii olarak yolu değiştirmen gerekiyor. Ayrıca Sorguları excelde yapmak zorunda değilsin. Accese sorgunu yaz ve kaydet sonra tabloymuş gibi çağır.
sorgu kodu
SELECT stok.parça_kodu, Last(stok.parça_adı) AS parçaadı, Last(stok.parça_alış_fiyatı) AS Sonparça_alış_fiyatı, Last(stok.parça_satış_fiyatı) AS Sonparça_satış_fiyatı, Last(stok.satıcı) AS Sonsatıcı, Sum(stok.adet) AS toplamadet, Sum(stok.kar) AS toplamkar, Last(stok.işlem_türü) AS Sonişlem_türü, Last(stok.aktif_pasif) AS durum, Max(stok.İŞLEM_KAYIT_TARİHİ) AS EnÇokTARİH, Last(stok.parça_alış_fiyatı)*Sum(stok.adet) AS İfade1
FROM stok
WHERE (((stok.[işlem_türü]) In ('mal girişi','mal çıkışı','düzeltme','iade')))
GROUP BY stok.parça_kodu;