اھلا بک ابا جودی
فی استعلام استخدم المعیار ھکذا
Like [Forms]![Form1]![txt_filter] & "*"
وبدل ان تستخدم رقم صفر مع الفورمات
="0" & Format(Date();"yy")
السنة تقدر تستخدم رايت مع السنة
=Right(Year(Date());3)
الیک المرفق بعدتعدیل
على الرغم الكلا بيعطيك النتيجة المطلوبة
اعتذر من استاذنا @أبو إبراهيم الغامدي لم ارى مشاركتك لان الصفحة كان مفتوع عندي قبل مشاركتك ... شكرا لك
qus.rar
فكرة سليمة 100% .. التنصيص يكون على علامة النمجمة(*) فقط وتربط بعلامة الدمج (&)
Like "0" & Format(Date(),"yy") & "*" // تعمل بشكل سليم لو وضعتها في الاستعلام
// بهذه الطريقة أيضا Format() يمكن استخدام
Like Format(Date(),"\0yy") & "*"
أو استخدم هذه إن شئت.. أضفتها في الاستعلام Qry_Filter
Like Mid(Year(Date()),2) & "*"
التعديل: qus.zip
السلام عليكم ورحمة الله
تم إضافة كود لطباعة كل القوائم (الجداول)... قمت ببعض التعديلات على تنسيقات الشيت (ناحية الطباعة - ارتفاع الصفوف - عرض الأعمدة وأخرى)...
بن علية حاجي
طباعة جميع القوائم مرة واحدة.rar
السؤالك لم يكن يساوي مع مطلبك كما مبينة في القاعدة
اتفضل استخدمت هذا الكود لمطلبك
Private Sub أمر77_Click()
Me.Text74 = DLookup("[التاريخ من]", "فترة الإدخال")
Me.Text76 = DLookup("[التاريخ الى]", "فترة الإدخال")
End Sub
اليك القاعدة بعد تعديل
New تطبيق Microsoft Office Access.rar
السلام عليكم
تفضل أرجو أن يوافق مرادك
ملاحظة :
من الأفضل أن تكون الصورة مرتبطة (Linked) وليست متضمنة بالتقرير كما هو بالمرفق وهذا لعدم تضخيم قاعدة البيانات فكما هو معلوم فان الصور المتضمنة تشغل حيز كبير جدا من مساحة البرنامج.
StrechPicture.rar
السلام عليكم ورحمة الله
أخي الكريم أبو أحمد، وصلت (دون تشديد الصاد) المعلومة جيدا وتم التعديل يبقى الحالتين (صفر - غ) لم تذكر عليهما الشروط فوضعتهما في الملف 0 (القيمة صفر)...
أخوك بن علية حاجي
عجائب وغرائب ومميزات الداله 2VLOOKUP.rar
السلام عليكم
الأخ الكريم / المسلم العربي
بارك الله فيك
بالنسبة للطلب الأول بتعديل ترتيب نتائج البحث كل ما عليك هو تغيير الخاصية الخاصة بالفوررم نفسه والمسماه Right to Left من TRUE الي FALSE
وتم تنفيذه لك بالمرفق
بالنسبة لطلب احضار الصورة اليك المرفق به ما تريد
كل ما عليك هو البحث عن الاسم الذي تريده وعند ظهور نتائج البحث في الليست بوكس واختيارك بكليك احد الاسماء المراد احضار الصوره له
تظهر لك صورته مباشرة في مكان الصورة وان لم يكن له صوره لديك سيظهر في الصورة انه لا توجد صورة ( كما هو في الصورة )
ولكن يجب الآخذ في الاعتبار :
يجب أن تكون الصور المراد احضارها للموردين موجوده في نفس الملف او الفولدر الموجود به ملف الاكسيل كما هو بالملف المرفق
يجب ان تكون أسماء الصور في الملف مطابقة تماما للاسم الموجود في شيت الاكسيل والا سيعتبره غير موجود
جرب المرفق واخبرنا بالنتائج
تقبل خالص تحياتي
New folder (7).rar
السلام عليكم
اخي الكريم
من الافضل دائما عن تقديم اي سؤال ان يتم اضافة مرفق كمثال لما تريده فهو يجعل لطلب اوضح
ليمكن للكثير مساعدتك
شاهد المرفق علي حسب فهمي لطلبك وفي المرفق
( اختار من القائمة في العمود A واضغط انتر او قم بالخروج من الخلية بالاسهم وشاهد النتيجة في العمود B )
ان شاء الله يفي بطلبك
تقبل خالص تحياتي
HAMADA OMAR-DATE.rar
السلام عليكم
لدى نموذج رئيسى مرتبط به نموذج فرعى
لكل سجل فى الرئيسى سجل واحد فى الفرعى
المطلوب عرض هذا السجل الوحيد فى الفرعى
المشكلة عند ضغط مفتاح الإدخال أو الجدولة فى الفرعى
يخفى السجل الوحيد و يظهر سجلا فارغا جديدا
كيف يمكن منع ذلك
وإظهار السجل الأول فقط فى الفرعى
وعدم السماح بإظهار سجل آخر و لو فارغا لأنه يخفى السجل الأول
وشكرا لكم