تقصد
1-مشتريات الشهر السابق أم أخر شهر ( قبل 30 يوم من الأن )
2- مشتريات الاسبوع السابق أم أخر أسبوع ( قبل 7 يوم من الأن )
3- مشتريات السنة السابقة أم أخر سنة ( قبل 365 يوم من الأن )
حدد من فضلك لأنه بيفرق كثيراً بالكود .
تفضل أخي .
'Table1 حسب اسم الجدول لديك
'ID حسب اسم لديك
DoCmd.SetWarnings False
DoCmd.RunSQL "DELETE * FROM Table1"
DoCmd.RunSQL "INSERT INTO Table1 (ID) VALUES (0)"
DoCmd.RunSQL "DELETE * FROM Table1"
Me.Requery
Refresh