نجوم المشاركات

واجهتني مشكلة عند فتح برنامج الاكسس وأيضاً عند محاولة فتح أي نموذج كانت تظهر رسالة نصها كالتالي ينتج عن التعبير عند الفتح الذي ادخلته كأعداد خاصية لحدث الخطأ التالي * حدثت مشكلة اثناء اتصال microsoft office access بخادم OLE او عند تحكم activex * قد ﻻينتج عن هذا التعبير اسم ماكرو او اسم داله معرفه بواسطة المستخدم او اجراء حدث * قد يكون هناك خطأ في تقييم الداله الحدث او الماكرو وبعد البحث وجدت الحل وهو 1- هذه المشاركة للأخت زهرة http://arabteam2000-forum.com/index.php?/topic/280802-ارجو-المساعده-ضروري/&do=findComment&comment=1352567 2 - هذا الشرح الرائع PreventNagMessageAPP.rar

بسم الله الرحمن الرحيم السلام عليكم ورحمة الله وبركاته اخوتي / اخواتي لي الشرف ان انظم الى هذا الصرح العلمي ، سائلاً المولى جل وعلا ان يوفقني لما فيه الخير للجميع 🙂 في اول مشاركة لي ، اضع بين يديكم برنامج مسقط التقارير (مسمى صانع التقارير متداول كثيرا ، لذا احببت ان اسمي برنامجي بإسم مميز ، إسم مسقطنا الحبيبة 🙂 ). البرنامج في نسخته الاولى ، لذا ، فلا تتوقعوا الكثير منه 🙂 في احد المشاريع التي عملت عليها قريبا ، كان العمل لسجلات شؤون الموظفين ، ولم يكن بالامكان عمل تقرير محدد ، حيث كانت التقارير المطلوبة من الادارة بشتى انواع البيانات ، طولا وعرضا. لذا اضطررت العمل على صانع للتقارير (في الواقع مسقط التقارير يعتبر برنامجا بحد ذاته ، فالعمل كان ، برنامج في برنامج 🙂 ). مع ان البرنامج بسيط في طريقة عمله (وطبعا عندي الكثير من الاشياء الاخرى التي اود ان اضيفها ، لكن في وقتها ان شاء الله ، وبما ان البرنامج مفتوح المصدر ، فانا ارحب بمن يضيف عليه خصائص جديدة 🙂 ) ، فمع بساطة البرنامج ، إلا ان نتائجه مرضية 🙂 العمل على البرنامج ابسط بكثير من شرحه 🙂 يمكنك نقل هذه الكائنات السته الى برنامجك الخاص ، ومسقط التقارير سيعمل بدون الحاجة الى اي تغيير او كود: مسقط التقارير يعمل على الجداول والاستعلامات فقط ، واليكم طريقة العمل: جدول او استعلام: اختر من ايهم تريد ان تعمل تقريرك ، جدول او استعلام ، الاسم: على اساس الاختيار السابق ، ستظهر لك قائمة بجداولك او استعلاماتك ، وعندما تختار اسم جدول او استعلام ، فان النموذج الفرعي الذي اسفل الاسم سوف يمتلئ باسماء الحقول من الجدول او الاستعلام ، وكلها عليها اشارة اخفي (اي كلها ستكون مخفية من الظهور في النموذج الفرعي الذي بالاسفل) ، احذف اشارة الاخفاء عن الحقول/الخانات التي تريدها ، وستظهر لك في النموذج الفرعي الذي في اسفل النموذج. هذا النموذج هو شكل مبسط من التقرير ، فكما ترى الحقول وعرضها ، وعدد السجلات ، ستراها في التقرير. هناك خطان فوق النموذج الفرعي ، باللون الاصفر والاخضر ، اذا كانت بياناتك اقل من الخط الاصفر ، سيكون التقرير بالطول ، وإلا فانه سيكون بالعرض ، وهناك خطان صفر ، فالمسافة بينهم ستكون للترقيم التلقائي للتقرير (لاحظ ان التقرير لبيانات النموذج ادناه سيكون بالعرض ، لأننا تخطينا الخط الاصفر 🙂 يمكننا ان نمسك الحقول/الخانات بالزر الايسر من الفأرة ونغير ترتيبها يمينا ويسارا ، كما ان البرنامج يحترم عرض الحقل الذي تقوم بتعديله ، (لاحظ ان التقرير لبيانات النموذج سيكون بالطول ، لأننا في حدود الخط الاصفر 🙂 وهذا هو التقرير لبيانات النموذج السابق ، ولاحظ ان البرنامج يقوم بتغيير ارتفاع الصف تلقائيا ، حتى يمكن مشاهدة جميع بيانات الحقل. اذا قررت ان تتعدى الخط الاصفر ، فنفس شروط الخط الاصفر تنطبق على الخط الاخضر ، وهنا نرى باننا اضفنا عنوان لراس صفحة التقرير ، واضفنا معلومات عن موضوع التقرير ، بالاضافة الى معلومات في ذيل التقرير: وهذا هو تقرير لبيانات النموذج السابق ، ولاحظ ان البرنامج يوسع عمود الترقيم التلقائي ليسد المسافة: بعد اختيار الحقول التي نريدها في التقرير ، نستطيع ان نفرز الحقول بالطريقة التي نريد: وكذلك تصفية البيانات حسب الحاجة: وهذا هو تقرير لبيانات النموذج السابق ، لاحظ عدد السجلات قد تغير ، لأني طلبت ان ارى السجلات التي مبالغها اكبر من 500: البرنامج لا يحفظ التقارير (نعم ، عمل طريقة لحفظ اسم لكل تقرير ، على قمة قائمة التحديثات ان شاء الله 🙂 ) ارجوا ان تتقبلوا مني هذا العمل المتواضع 🙂 اسئلة/اقتراحات ، سأحاول الرد على قدر استطاعتي ان شاء الله 🙂 جعفر ملاحظة1: عمود المجموع لا يعمل ، وكان يجب ان اخفيه 😞 ملاحظة2: في الاساس كان عندي كمية كبيرة من صور الشرح ، إلا ان المنتدى لا يسمح بأكثر من 10 مرفقات ، فاختزلت الموضوع 🙂 ملاحظة3: ادراج فيديو لطريقة عمل التقرير: Muscat_Reports.zip

بسم الله الرحمان الرحيم السلام عليكم تحياتي لجميع اعضاء اوفيسنا المحترمين الموضوع ليس بجدبد فقد تم التطرق له من قبل الاستاد القدير عبد الله باقشير جازاه الله خيرا و ان شاء الله نراه بينانا في المنتدى عن قريب لمتابعتي المنتدى في الاونة الاخيرة رئيت عدت تسائلات عن البحث والتعديل في الجداول و رئيت العديد من الحلول فحاولة الاجتهاد و الوصول الى ابسط و اسهل طريقة لعمل ذلك لذى فكرة في برمجة فورم مرن يكون ملائم لاي جدول مهما كان عدد صوفوفه او عدد اعمدته و لكي يتمكن اي عضو مهما كانت معرفته بالبرمجة ضعيفة من استعماله بسهولة ووصلة الى هذا الفورم الذي ارجو ان اكون قد وفقت في فكرته وان يستفيد منه الاغلبية يتميز هذا البرنامج يجلب الجدول المستهدف للعمل عليه و امكانية البحث داخله بدلالة اي عمود من اعمدته كما ان البحث يتميز بالبحث بأول حرف من الكمة او اي جزء منها حسب احتياجك وايضا تتميز عملية البحث بالسرعة الفائقة لاني اعتمدت على المصفوفات للوصول الى ذلك و تعرفون قوة المصفوفات و فعاليتعها اما بخصوص التكستبوكس و الكمبوبكس فتنشأ برمجيا على حسب عدد اعمدة الجدول نأتي الان الى طريقة استعمال الفورم هذا مع ملفك الخاص اولا اذهب الى محرر الاكواد تجد موديل باسم ModulePublic تجد في بدايته هذين الكودين او التعريفين ان صح التعبير Public Const sNomFeuil As String = "data" 'اسم ورقة العمل التي تحمل قاعدة البيانات Public Const sTableau As String = "tbData" ' اسم جدول قاعدة البيانات اضن ان الامر واضح تصع اسم الشيت الذي يحوي الجدول مكان عبارة "data" واسم الجدول نفسه مكان عبارة "tbData" ملاحظة : يجب ان تكون قاعدة البيانات عبارة عن جدول لايهم عدد اعمدة ولا صفوفه المهم ان يكون جدول باتباعك الخطوات السابقة تكون قد انتهيت من ربط جدولك مع الفورم ثانيا نأتي الى الاعمدة التي تحتاج قوائم في مثالنا لدين العمود 4 و العمود الاخير يحتاجون ان يمثلو في الفورم على شكر قوائم (كمبوبكس) لتنفيذ ذالك قم بأنشاء القوائم الازمة في اي شيت تريد و اعطي كل مدى قائمة اسم معين في المثال الخاص بنا سمينا نطاق قائمة الجنس ب list1 كما هو موصح في الصورة ثم اذهب الى رأس العمود المستهدف قم بادراج تعليق له و اكتب داخل التعليق نفس اسم نطاق القائمة و انتهى الامر ارجو ان اكون قد وفقت في الشرح وان يستفيد أكبر عدد من الاعضاء من هذا العمل ملاحضة: تنسيق عرض اعمد اليست يكون بتنسيقك ععرض اعمدة الجدول نفسه من الشيت و الفورم يكتشف العمود الذي يحوي تواريخ تلقائيا اي ملاحظة او استفسار او اضافة تحتاجونها للفورم لا تترددو في طلبي اهدي هذا العمل الى الغائبين الحاضرين في قلوبنا الاخ ضاحي الغريب و الاستاد عبد الله باقشير تحياتي للجميع UserForm Flexibles.rar

إصدار جديد من سجل قيد التلاميذ إن شاء الله يساعدكم في أعمالكم سجل القد المعدل.rar

السلام عليكم ورحمة الله وبركاته اثناء البحث عن وظائف دوال الاكسيس وجد هذا الملف لعله يهم بعض الاعضاء لذلك ارفقته كتاب دوال الاكسيس.pdf

فقط غير منبثق الى نعم في النموذج people App_open.rar

متى يظهر هذا الخطأ وضح اكثر مشان نقدر نساعدك

تفضل برنامج ادارة التدريب.mdb

بالتوفيق

السلام عليكم ورحمة الله وبركاته كفــــارة المجــلس سبحانك اللهم وبحمدك ، أشهــد أن لا إله إلا أنت أستغفرك وأتوب إليك جزاكم الله خيرا وجعل كل ايامكم رضا لوسمحت غمود الذكر او الانثى واختيار تاريخ الميلاد بدل الكتابه وشكرا والسلام عليكم ورحمة الله وبركاته

=[Page]+1 في مربع نص ضع السابق مع تغيير 1 حسب ما يلزم

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

راااااائع تسلم الايادى اخ @صالح حمادي

جرب التأكد من اعدادات اللغة كما بالصور بالمشاركة الاتية

يعد اذن اخي على هذا الكود ربما يكون اسرع قليلاٌ لانه يعنمد على المصفوفات Sub move_data() Sheets("تصفية").Cells.ClearContents Dim arr() Dim i%, m%: m = 1 For i = 1 To 50 If i = 11 Then i = 44 ReDim Preserve arr(1 To m) arr(m) = i m = m + 1 Next m = 1 For i = LBound(arr) To UBound(arr) Sheets("تصفية").Cells(2, m).Resize(100, 1).Value = _ Sheets("البيانات").Cells(2, arr(i)).Resize(100, 1).Value m = m + 1 Next Erase arr End Sub

مشكلة اعدادات اللغة فى الويندوز اخى الكريم لو ما اتحلت المشكلة قولى وانا اشرحها لك

السلام عليكم ورحمة الله وبركاتة تحياتى للجميع منذ فترة ليست بالقصيرة كنت اود تغير الطريقة المعتادة لحساب النسب المستقطعة او المضافة التى يستخدمها الكثير منا بأستخدام ( IF ) الشرطية . وما ينجم عنها من صعوبة فى تعديلها عند رغبة المستخدم تعديل النسب لاستخدام التداخل فى صيغة ( IF ) الشرطية . وكثرا ما انسى توضيح هذه الفكرة فى زحمة الحياة . واليوم وجدت مشاركة لتقيم الدرجات الى ( ضعيف - جيد - ممتاز ... الخ ) وجدت انها فرصة مناسبة لذلك الفكرة تعتمد على انشاء جدول بالقيم والنسب يسهل التعديل عليه وبأستخدام دالة (VlookUP) تستخرج النتائج بسهولة ويمكن رؤية تأثير تغير النسبة مباشرة عند تغيرها فى الجدول والمرفق به ثلاثة امثلة الاول لاضافة النسبة الى اصل القيمة والثانى لخصم النسبة من اصل القيمة والثالث للتقيم (سواء لدرجات او اداء) والامثلة بالمرفق سهله بإذن الله ______________________________________.rar

بسم الله الرحمن الرحيم هذا ملف اكسيل من تصميمى يستطيع ان يقرا bin file قد يكون مفيدا ارفقت ملف bin و لكن يجب ان يكون مثبت على الجهاز vb السلام عليكم Read.rar