تفريغ حقول النماذج من البيانات مع الاحتفاظ بالبيانات في جدول اكسس

[iman mohammed]

السلام عليكم ورحمة الله

اساتذتي الكرام

لدي ملف اكسس قمت بتصميمه للحسابات المصرفية

ولكن لدي مشكلة هو كيف اقوم بتفريغ حقول النماذج من البيانات مع الاحتفاظ بالبيانات في جدول اكسس

اي عندما اريد ان اطبع تقرير سوف يظهر لي كل البيانات السابقة كما في الصورة

ولكن انا اريد طريقة اقدر امسح بيانات من النماذج مع الاحتفاظ به في جدول وفي اي وقت اقدر ان ارجع اليه

[د.كاف يار]

تفضل اخي الكريم

Dim varFilter As Variant
varFilter = 0

   With Me.Form
   
   If Not IsNull(varFilter) Then
     .DataEntry = False
     .Filter = varFilter
     .FilterOn = True
   Else
    .FilterOn = False
   End If
    .Requery
  End With

 

[iman mohammed]

جزاك الله خير الجزاء

ولكن اين اضع الكود

واذا رغبت كيف اظهر بقية البيانات

تم تعديل سبتمبر 13, 2019 بواسطه iman mohammed

[طلب اكسس]

عيني هذا كود مالت الفلتر

اوضعه في حدث عند الفتح

[iman mohammed]

اين تقصد في جداول او تقارير او نماذج ؟؟؟ صراحة انا مبتدى في اكسس ممكن تعلمني طريقة وجزاك الله خيرا

[طلب اكسس]

اتوقع النماذج لكن ما يخالف جربه على النموذج

[iman mohammed]

جزاكم الله الف خير

حاليا تم عملية التفريغ بنجاح

ولكن عندما اقوم بفتح التقرير يظهر لدي كل البيانات

يعني في النموذج فقط يقوم بالتفريغ البيانات وبس افتح التقرير يرجع كل البيانات

 

 

[د.كاف يار]

اخي الكريم

يوضع الكود في حدث عند الفتح ( من وجهة نظري هذه ليست طريقة عملية )

 

خذ هذه الفكرة 

- اضف عمود جديد في الجدول بإسم " الحالة "

- الحالة الافتراضية " غير مرحل" 

- يتم انشاء استعلام الحاقي لتغيير الحالة من " غير مرحل " الى " مرحل "

- يتم وضع معيار في النموذج لفلترة " غير مرحل " بحيث تختفي جميع السجلات المرحلة