ابوخليل

السلام عليكم بالنسبة للتاريخ : فكأنك تريد كتابة تاريخ اليوم لان السؤال المتبادر ما الشهر والسنة التي تريد ان تدرجها تلقائيا ؟ ان كان جوابك هو : المطلوب ادخال تاريخ اليوم الحالي فاكتب الكلمة التالية في حدث بعد التحديث للحقل الذي يسبق حقل التاريخ textDate=Date() باعتبار ان textDate هو حقل التاريخ النتيجة سيتم كتابة التاريخ الحالي في حقل التاريخ ويمكنك بعدها التعديل ايضا

اخونا الضياء حبذا لو كان المرفق مفتوح المصدر حتى تكون الفائدة لاخوتك اعم واشمل واجرك على الله

شكرا للاستاذ كرار على المشاركة والمساعدة ويمكن ان يكون امان الاكسس له دخل في ذلك جرب تخفيض امان الماكرو الى الحد الادنى فإن وصلت الى نتيجة وإلا فخذ بعلاج الاستاذ كرار

نعم ،،، وقد يستعصي التسجيل وهذا هو الواقع في وندز 8 وحينها ستضطر الى فتح cmd كمسؤول ثم تكتب السطر المذكور ولا حظ انك هنا لن تكتب علامات التنصيص كنت بدأت في كتابة موضوع بخصوص تخطي هذه العقبة برمجيا وبإذن الله سأكمله في وقت لاحق

وعليكم السلام العادة المتبعة ان لا يتم رصد الاجماليات داخل الجدول وانما تكون مؤقته يتم عرضها وقت الحاجة وذلك داخل الاستعلامات وتكون هذه الاستعلامات هي مصدر بيانات التقارير والنماذج او تكون في حقول غير منضمة داخل التقرير او النموذج

التغيير : ان تسجيل المكتبات سيكون داخل مجلد syswow64 بدلا من system32 ولكن ستلاحظ ان قوة الامان اشد خاصة في الاصدار 8 وما فوق

نلاحظ ان اخونا اشرف مشاركاته شبه تجارية والاولى ان تكون في مكانها المناسب

انظر الصورة

استدراك : واضح من كتابتك لسطر التسجيل ان نظام الملفات لديك هو 32 بت اذا : افحص امان وندز عندك وقم بتخفضه الى الحد الأدنى ثم اعمل اعادة تشغيل للجهاز تجده في صفحة المستخدمين / تغيير حساب مستخدم

وعليكم السلام ما اصدار وندز عندك ؟ وما نظام الملفات ؟

السلام عليكم الاخ الكريم المنتدى مليء بمثل هذه المواضيع فقط عليك البحث كما بين اخونا الاستاذ عبدالله هذا واحد وهذا آخر

تفضل تم عمل المطلوب والتطبيق عل حقل 13 وحق المجموع في تذييل التقرير db7.rar

الاكسس والفيجوال ؟ اذا انت في المكان غير المناسب الافضل البحث عن الحلول في منتديات فيجوال

لا لم احذف شيئا بل اضفت يمكنك المحاولة مجددا

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

السلام عليكم اخي الكريم : عندما تطلب اكثر من طلب في موضوعك فانت تعمل على جعل اخوتك يعرضون عن مساعدتك والمتضرر انت اولا وآخرا ... وايضا تعرض موضوعك للاغلاق لهذا سنت القوانين في هذا المنتدى لصالح السائل اولا ثم المصلحة العامة حاول دائما ان يكون في كل مشاركة سؤالا واحد فقط سأجيبك على سؤالك الرئيسي وهو عدم استجابة التقرير عندما تكون البيانات في الجدول اقل من 31 يوما تفضل الاجابة / المسألة محلولة داخل مثالك ( تم حذف يوم 8 ) ولن ادلك على مكان التعديل حتى ترسخ المعلومة لديك وتشعر بلذة الاكتشاف حاول ان تجد الحل ؟ db6.rar

وعليكم السلام نعم يمكن ذلك ... وهو ما نفعله عادة افتح على عرض الماكروات الموجودة / تنظيم سيفتح مربع حوار يشتمل على مربعين : واحد للقالب العام والآخر للمستند المفتوح انقل الماكروات والاختصارات من مربع القالب الى مربع المستند

السلام عليكم لم تسن قوانين المنتدى الا لمصلحة الجميع للسائل والمعلم ولمن يأتي بعدهم الاولى والافضل ان تكون كل مسألة في عنوان وموضوع جديد يخصها تعدد العناوين حتى لو كان ضمن موضوع واحد هو علامة صحية نجني ثمارها مستقبلا عند عملية البحث سأغلق الموضوع من اجلك

وعليكم السلام في عرض التصميم للنموذج ، افتح على خصائص الحقل / لسان التبويب بيانات اكتب في حقل قاعدة التحقق من الصحة العبارة التالية : Between 3 And 10 ثم اكتب في حقل نص التحقق من الصحة العبارة المناسبة مثلا : " يجب ان يكون الرقم بين 3 و 10 "

نعم يمكن ولكن بوسيلة خارج اكسس والوسائل متعددة بالنسبة للاخ محمد تخفيض الامان يكون بتخفيض امان الماكرو ابحث داخل المنتدى فستجد ما يرشدك

وعليكم السلام قم بتخفيض امان اكسس الى الحد الادنى

تفضل تم تعديل الاستعلام وعمل تنسيق شرطي في حقول التقرير في وضع التصميم انقر بزر الفأرة الايمن على احد الحقول الملونة ثم اختر من القائمة التنسيق الشرطي وانظر كيف تتم العملية واكمل البقية على النسق نفسه New 2.rar

السلام عليكم جرب يكون المعيار مثل هذا : Like "*" & [Forms]![form8]![t1] & "*"

السلام عليكم الاخ ناصر طلب مني المساعدة ولم يعلم ان خبرتي في اكسل افرغ من فؤاد ام موسى ولكني قد افيده في كيفية تفعيل اي كود وقت الحاجة اولا نحول الكود الى وحدة نمطية عامة يعني سيصبح كود استاذنا احمد هكذا : Public Function macrox() 'äÓÎ ÊäÓíÞ æÑÞÉ 2 Çáì ßá ÇæÑÇÞ ÇáãáÝ Dim RN1 As Range, SH, ER Sheets("æÑÞÉ2").Select Sheets("æÑÞÉ2").Range("A9:J9").Copy For SH = 2 To Sheets.Count ER = Sheets(SH).UsedRange.Rows.Count Set RN1 = Sheets(SH).Range("A8:J" & ER) RN1.PasteSpecial Paste:=xlPasteFormats, Operation:=xlNone, _ SkipBlanks:=False, Transpose:=False RN1.PasteSpecial Paste:=xlPasteColumnWidths Next SH Application.CutCopyMode = False End Function الآن نستطيع ان نستدعي هذا الكود وتشغيله في اي حدث فقط نكتب العبارة التالية : Call macrox

بالضبط كما بينت لك data.amr هي قاعدة بياناتك وقد زادك ايضاحا الاستاذ ابو محمد ان هذا من باب الحماية النتيجة : ان قاعدة البيانات تالفة وهذه بعض اسباب مجربة لحدوث مثل ذلك: 1- انقطاع الكهرباء وقاعدة البيانات تعمل 2- تفعيل خاصية الضغط والاصلاح الآلي عند الاغلاق احيانا في مثل هذه الحال يمكن تدارك هذه المشكلة واستخراج الجداول او بعضها واحيانا اخرى تذهب البيانات ادراج الرياح . وهنا تظهر فوائد اخذ نسخة احتياطية دوريا وانما سميت احتياطية : احتياطا عند حصول مشكلة ما