منتصر الانسي

اخي العزيز هل من الضروري اظهار النص في مربع تسمية (Label)أم يمكن أن يظهر في مربع نص (TextBox) ....؟ ونص التذكير هذا هل سيتم أخذه من جدول أم سيدخل كل مرة من قبل المستخدم ...؟ أرجو توضيح هذين الأمرين وإن شاء الله لا يصير خاطرك إلا طيب تحياتي,,,

اخي العزيز بالإعتماد على المثال Resize قم بالخطوات التالية : قم بإستيراد الميدولات (gr & tow) الى قاعدة بياناتك 1- في حدث (عند التحميل او On Load) للنموذج يكتب الكود الذي يقوم بتكبير حجم النموذج للحد الأقصى ثم يقوم بإغلاق بقية النوافذ المفتوحة حتى لا تتأثر من تغيير دقة الشاشة DoCmd.Maximize Shell "taskkill /f /im explorer.exe", vbMinimizedNoFocus ملحوظة : اذا كنت ترغب في تنبيه المستخدم عن التغييرات قبل تنفيذها يمكنك أن تسبق الكود بهذا السطر If MsgBox("سيتم إغلاق خلفية ويندوز فإذا كان لديك برامج لم تحفظها اختر (إلغاء الأمر) وقم بحفظها أولاً", vbOKCancel, "تنبيه") = vbCancel Then DoCmd.Quit 2- في حدث (عند الفتح أو On Open) في النموذج اكتب الكود الذي يقوم بحفظ الإعدادات الحالية وتغييرها الى الإعدادات الخاصة بك Call xg_GetScreenResolution Call ChangeResolution(1024, 768) وهنا يمكنك إستبدال الأرقام 1024 و 768 بالدقة المطلوبة بحسب رغبتك 3- في حدث (عند إلغاء التحميل او On UnLoad) يكتب الكود الذي يسترجع الإعدادات الأصلية ويشغل بقية النوافذ Call ChangeResolution(aa1, aa2) Shell "explorer.exe", vbMinimizedNoFocus ومرفق لك مثال مطبق فيه ماسبق أرجو أن يكون الشرح واضح تحياتي,,, NewResize.rar

بالطبع اخي العزيز لأن العملية في الأساس مبنية على جملة Sql التي تقوم بتصفية السجلات بناء على النص الذي يتم إدخاله وجملة Sql يجب أن تستمد البيانات من جدول تحياتي,,,

اخي العزيز هذه الرسالة تعني ان هناك كود يعتمد على عنصر تحكم غير موجود وفي هذه الرسالة يخبرك أن الكود لم يجد عنصر التحكم الذي إسمه (Newbal) لذا كل ما عليك الا أن تفتح محرر فيجوال الخاص بالنموذج وتقوم بالبحث عن الاماكن التي ذكرت فيها هذه الكلمة وستجدها مثلاً في حدث (BeforeInsert أو قبل الإدراج) كما يلي Private Sub Form_BeforeInsert(Cancel As Integer) Me![Nclient] = Me![dl] Me![Soum] = Me![Newbal] End Sub فإن كان وجود عنصر التحكم هذا ضرورياً فيجب عليك إنشاؤه في النموذج مالم فقم بحذف الكود تحياتي,,,

بالفعل اخي المعذرة لم انتبه لهذا الاستعلام ومرفق لك التعديل تحياتي,,, Service.rar

مشكور اخي ابو احمد على الكلام الطيب الموضوع ليس فيه اي عملقة ولا شيئ ولكن هذا مايثبت ان اي دوال تصمم في اكسس يمكن تنفيذها في اكسل وحتى وورد (والعكس صحيح) فجميعها تعمل في بيئة واحدة هي بيئة(VBA)ولكن الصعوبة التي واجهتني كانت انه يتم اخذ الاستثناءات الخاصة بالأسماء كـ(عبد , الله , الدين , ....الخ) من جدول في قاعدة البيانات ولم أكن أعرف طريقة التنفيذ في اكسل فقد كان أفكر ان أجعلها في ورقة مستقلة بحيث يتم أخذها من هذه الورقة وبصراحة فأنا أجهل كيفية التعامل مع اوراق العمل والخلايا في اكسل ولكن الأستاذ خبور (وهو العملاق الحقيقي) قد تجاوزها بواسطة إستخدامه المصفوفة ومن هنا تم عمل التوليفة في الأخير لدي استفسار هل هناك إمكانية لتنفيذ هذه الطريقة (ان يتم وضع الإستثناءات في ورقة مستقلة) لمنح حرية اكبر للمستخدم...؟ تحياتي,,,

اخي العزيز هذا شكل تقرير وليس استعلام عموماً مرفق لك تعديل بتقرير مشابه تحياتي,,, db31.rar

أخي العزيز موضح لك الطريقة بالصور تحياتي,,,

الأخوة الأعزاء الحقيقة الواحد يدخل على منتدى أكسيل وهو مرعوب من العمالقة اللي فيه اسمحوا لي اخواني بهذا التعديل البسيط حيث قمت بعمل (توليفة) بين دالة تم إعدادها بأكسس بدالة الأستاذ خبور بحيث يصبح بالإمكان إستخراج أي جزء مطلوب من الإسم أرجو أن أكون موفقاً في هذه (التوليفة) تحياتي,,, تجزئة الأسماء.rar

اخي العزيز عند إنشاء قاعدة بيانات جديدة يقوم الاكسس بإنشاء هذه الجداول ليتم فيها حفظ كائنات القاعدة من جداول وإستعلامات ونماذج وتقارير وعلاقات ... الخ وتكون هذه الجداول للقراءة فقط ولا يستطيع احد التعديل في بياناتها ولكن يمكن الاستفادة من تلك البيانات في حالة الاستعلام عن اسماء الجداول او النماذج مثلاً وهي تكون في الأصل مخفية إلا إذا ماتم تحديد الخيار (إظهار كائنات النظام أو Show System Objects) ضمن خيارات القاعدة كما في الصورة تحياتي,,,

اخي العزيز قد يكون الامر مرتبط بالمراجع افتح محرر فيجوال في برنامجك ثم افتح قائمة Tools واختر اول خيار References عندها سيظهر لك صندوق يحتوى على المراجع المعتمدة في برنامجك قارنها بالمراجع التي في الصورة التالية فإذا كان هناك مرجع ناقص لديك (لاتهم الزيادة ولكن النقص فقط) يمكنك عندها بالنزول اليه والتأشير أمامه ثم أنقر OK أو عند ظهور كلمة Missing أمام احد المراجع للبحث عنه سواء داخل الجهاز أو في الانترنت يرجى التأكد مما سبق والافادة بالنتيجة تحياتي,,,

اخي العزيز مرفق لك مثالك بعد تطبيق الفكرة على الكلمة الأولى والمعنى الخاص بها ويمكنك تطبيقها على بقية الكلمات تحياتي,,, نسخ من الدروس.rar

اخي العزيز اجعل الشرط عندما تكون القيمة اكبر من (90.) "تسعين من مائة" وليس أكبر من (90%) تحياتي,,,

اخي العزيز دالة Partition هي من ضمن دوال اكسس وتقوم بتقسيم مجال من الأرقام إلى أجزاء متساوية بحيث تنسب العدد الى الجزء الذي ينتمي اليه ولكن حالتك هذه لا تنطبق عليها لذا قمت بعمل دالة بسيطة لتنفيذها وستجدها في المثال المرفق تحياتي,,, db31.rar

اخي العزيز تفضل مثالك حيث تم دمج جميع الاستعلامات ضمن استعلام All Installment ويمكنك حذف بقية الإستعلامات إذا كنت لا تستخدمها في أغراض أخرى ارجو ان تطلع على نتيجة الاستعلام والتأكد من النتائج تحياتي,,, Service.rar

اخي العزيز ابو خليل اخونا حامل المسك مضطر في جعل الملف نسخة 2007 لضرور تلوين الكلمات (كما سبق طرحه في موضوع سابق) وبخصوص طلبك الاول اخي حامل المسك فبإمكانك ذلك عن طريق التنسيق الشرطي اما طلبك الثاني فلدي مثال ولكنه لنسخة 2003 سأرفقه لك لعله يفيدك تحياتي,,, اكمال الحقل بالنقط.rar

اخي العزيز فيما يخص اصدار 2003 فلا توجد هذه الخاصية الا عن طريق الكود ومرفق لك مثالين ممتازين اما في إصدار 2007 و 2010 فأعتقد أن خاصية التناسب مع الشاشة تأتي ضمن خصائص النموذج تحياتي,,, Resize.rar

تفضل اخي العزيز اليك الشرح بالصور تحياتي,,,

اخي العزيز مرفق لك مثالك بعد التعديل وستجد التعديلات في جدول ونموذج (ورقة اليوم) واستعلام qq تحياتي,,, PARPAIN_Email.rar

اخي العزيز كود المريض يظهر لكل فئة عمرية لذلك ظهر الكود A11 مع الفئة العمرية من 10 الى 19 سنة والفئة من 30 الى 39 سنة ولكن لو قمت بالاستغناء عن هذا الحقل (عمر المريض) فسيظهر كود المريض مرة واحدة فقط تحياتي,,,

اخي العزيز جرب التعديل المرفق تحياتي,,, db31.rar

اخي العزيز ولكن لايوجد حقل تحديد نوع المريض فكيف تريد معرفة الذكور من الإناث...؟ تحياتي,,,

اخي العزيز لاتوجد طريقة مباشرة لتنفيذ طلبك ولكن توجد طريقة غير مباشرة مرفق لك مثالك وبه مريعين الاول يكفي ان تكتب فيه 4 احرف من النص المطلوب تصفيته مثال اكتب (وطني) الثاني اكتب فيه نص التصفية الذي تريد ثم انقر انتر مثال اكتب (البوابة) ولاحظ النتيجتين وكما ستجد أنه عند إضافة سجل جديد سيحتفظ بقيمة آخر سجل ملحوظة : نظراً للفكرة التي في المثال قمت بارفاقه باصداري 2003 و 2007 تحياتي,,, combo box2007.rar combo box2003.rar

اخي العزيز مرفق مثالك بعد التعديل وبأكثر من أسلوب تحياتي,,, awad1.rar

اخي العزيز بالإضافة الى الدروس الموجودة في المواضيع المثبتة والإرشيف يوجد اسطوانة ممتازة جداً ستجدها في هذا الرابـــط وستجد رابط الأسطوانة المباشر في مشاركتي في نفس الموضوع وهناك درس مهم في تصميم الجداول والعلاقات في الموضوع على الرابـــط ومرفق لك كتابين لشرح أسس البرمجة من حيث تحليل الأنطمة وتصميم وقواعد البيانات أظن مافيش أحسن من كده ... أرجو أن تلقى الفائدة المرجوة تحياتي,,, قواعد البيانات.rar