اذهب الي المحتوي
أوفيسنا

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

  1. jjafferr

    jjafferr

    أوفيسنا


    • نقاط

      17

    • Posts

      9935


  2. سليم حاصبيا

    سليم حاصبيا

    أوفيسنا


    • نقاط

      11

    • Posts

      8723


  3. Elsayed Bn Gemy

    Elsayed Bn Gemy

    الخبراء


    • نقاط

      10

    • Posts

      1162


  4. بن علية حاجي

    بن علية حاجي

    الخبراء


    • نقاط

      4

    • Posts

      4343


Popular Content

Showing content with the highest reputation on 10/26/19 in مشاركات

  1. فى البداية اوجه الشكر لكم وانوه ان هذا الموضوع هو تكملة للموضوع التالى الخاص بتحويل الاكسس الى سيكوال انشاء السيرفر وتحويل اكسس الى سيكوال اى انـــــه لابد من تثبيت السيرفر اولا فقط على الجهاز الذى سيكون عليه قاعدة البيانات وتحويل قاعدة البيانات من اكسس الى سيكوال لكى يتم الاتصال بشكل فعلى هنا يعنى هنثبت سيكوال فقط على جهاز السيرفر مش كل الاجهزةة كلانا يعرف كيفية مشاركة الاكسس على الشبكة المحلية فقط هنعمل مشاركة للمجلد الذى يحتوى على قاعدة البيانات وبكدا اى مستخدم على الشبكة المحلية يقدر يستخدم قاعدة بيانات اكسس الموضوع يختلف كثير مع سيكوال تعالو لنقسم الموضوع الى جزئين الاتصال عن طريق الشيكة المحلية الاتصال عن طريق الانترنت 1 - فتح بورت فى الويندوز 1 - فتح بورت فى الويندوز 2 - فتح بورت فى السيرفر 2 - فتح بورت فى السيرفر 3- تثبيت الاى بى للويندوز 3 - فتح بورت فى الراوتر 4 - الحصول على اى بى ثابت اولا الاتصال عن طريق الشبكة المحلية ------------------------------------------------ بعد نثبيت السيرفر وتحويل الاكسس الى سيكوال اى تصدير الجداول من اكسس الى قاعدة بيانات سيكوال هناك امور مشتركة بين الاتصالين وهو فتح بورت فى الويندوز وفتح بورت فى السيرفر اذا نبدأ فى شرح كيفية فتح بورت فى الويندوز عن طريق Windows Firewal كدا فتحنا بورت لسيكوال سيرفر فى النظام طبعا لو عندك برامج حماية غير windows Defender يجب ان تسمح له بفتح البورت ------------------------------------------------------------------------------------------------------------------------------------------------------------------------------- والان فتح بورت فى السيرفر كدا فتحنا بورت فى السيرفر نيجى بقى للاتصال من جهاز اخر غير جهاز السيرفر تابع معى اولا يجب معرفة اى بى جهاز الذى عليه السيرفر عن طريق Cmd ثم ipconfig هيظهر الاى بى فى IPv4 Adress اما الثانية فدا عنوان الراوتر طبها الاى بى الخاص بجهاز السيرفر هو 192.168.1.3 وهذا الذى سوف نتصل به من الكمبيوتر الاخر الذى على نفس الشيكة المحلية هنفتح ODBC زى ما عملنا فى الموضوع السابق والخطوة الاهم هى التالية هنكتب اسم قاعدة البيانات اسم السيرفر سيكون كاالتالى الاى بى الخاص بالسيرفر , بورت السيرفر ( 1433 ) كوما وليس نقطة (192.168.1.3,1433 ) وتكمل خطواتك عادى زى الموضوع السابق بقى وبكدا يبقى اتصلنا بجهاز السيرفر ونستطيع نعمل ارتباط لجداول قاعدة البيانات من سيكوال الى اكسس حاجة اخيرة الاى بى الخاص بجهاز السيرفر بيتغير كل شوية ممكن نثبته عن طريق الخطوات التالية هنجيب الاى بى من cmd كدا احنا ثبتنا الاى بى الخاص بالجهاز اللى عليه السيرفر علشان تقدر تدخل بيه من على اى جهاز ------------------------------------------------------- المرحلة الثانية الاتصال بالسيرفر من على النت اى ليس شرطا وجودالمتصل على نفس الشبكة المحلية هى هى نفس الخطوات فقط هنضيف خطوة زيادة الا وهى الحصول على Static IP وفتح بورت فى الراواتر بالنسبة للاى بى الثابت دى خدمة بتقدمها الشركة اللى انت متعاقد معاها على خط الانترنت فى مصر تكلفة الاى بى الثابت عشرة جنيه شهريا من We بتطلبه من الشركة وهى بتثبتلك اى بى عمتا لو عاوز تعرف الاى بى بتاعك تابع الاتى مع العلم ان الاى بى بتغير كل ما تعمل ريستارت للراوتر هتبحث فى جوجل كدا ويطلعلك الاى بى كدا ودا اللى هنقدر ندخل بيه على السيرفر من اى مكان شرط توافر انترنت طبعا مش هتقدر تتصل على السيرفر بالاى بى دا اللى لما تفتح بورت فى الراوتر اللى متصل عليه السرفر تابع معايا انا عندى راوتر تى داتا وهشرح عليه تقريبا هى نفس الخطوات فى كل الروترات فتح بروت فى الراوتر طبعا هتعرف عنوان الراوتر بتاعك من هنا والاى بى اللى هنستخدمه هندخل على المتصفح ونكتب فى عنوان الراوتر وندخل عليه طبعا الاسم وكلمة السر بيبقى موجودين على ضهر الراوتر بعد كدا نفس الخطوات بالظبط كدا يبقى فتحنا البورت فاضل اللاتصال طبعا هتفتح ODBC ذى ما ذكرنا قبل كدا وهتدخل البيانات زى كدا الاى بى , 1433 وتابع بقية الخطوات زى الموضوع السابق علشان تقدر تحضر قاعدة بيانات سكوال على جهازك وتتصل عليه طبعا الشغل اللى مطلوب على جهاز السيرفر الحصول على الى Static IP فى حالة الاتصال عن بعد فتح بورت فى الرواتر فى حالة الاتصال عن بعد تثبيت اى بى الجهاز فتح بورت فى الويندوز فتح بورت فى السيرفر بعد ما تعمل كل دا انت ما عليك الا انك تتصل على السيرفر كما ذكرت دون الحاجة الى تثبيت سيكوال سيرفر على جهازك شكرا لكم كان مفروض فى مرفق بتدخله بيانات السيرفر زى اى بى اسم قاعدة البيانات سيكوال اسم المستخدم لو فى وكلمة السر للسيرفر وهو هينشأ الاتصال اوتامتيك طبعا بعد ما تظبط جهاز السيرفر زى ما قلنا وفى نفس المرفق خيار اخر وهو هتدخل البيانات السابقة اضافة الى اسم جدول موجود على سيكول وهو هيربطهولك تلقائى فى قاعدة اكسس بس الوقت اتاخر اوى وانا بسقط من النوم الصراحة ان شاء الله نقوم بتصميمه غدا السلام عليكم ورحمة الله وبركاته اخوكم السيد جمال 🥰
    8 points
  2. 4 points
  3. السلام عليكم ورحمة الله تعالى وبركاته أساتذتي وإخوتي الكرام تحية طيبة لكم وبعد ... بعد إنقطاع طويل عن المنتدى بسبب عدة ظروف أعود لكم بهذه الهدية المتواضعة أتمنى ان تنال استحسانكم البرنامج المرفق فريد من نوعه نوعاً ما فهو عبارة عن اضافة بيانات شخص مع صورته حيث يتم تخزين صورة الشخص في الجدول كبيانات ثنائية طويلة (binary long data) كما يمكنك استعراض الصورة وتغييرها ايضاً قد يتسائل البعض عن أهمية استخدام هذه الطريقة في حفظ الصور!! ولماذا لا نقوم بحفظ الصور خارج قاعدة البيانات فقط وربطها بالبرنامج؟ الجواب ببساطة هو انني قد واجهت مشكلة في استعمال برنامج لإصدار بطاقات تعريفية للموظفين حيث ان البرنامج يقرأ بيانات الموظفين من قاعدة بيانات اكسس وعند اضافة صورة الموظف يقوم بتخزينها في القاعدة بصيغة بيانات ثنائية طويلة كما يقرئها بنفس الصيغة ايضاً ولا يتعامل مع الصور المرتبطة في الجدول ولضعف امكانيات البرنامج في ادخال البيانات والبحث عنها وفلترتها اضطررت الى انشاء برنامج يدخل البيانات الى تلك القاعدة وفلترتها وما الى ذلك ومن هنا وجدت انني لابد من تمكين برنامجي من اضافة الصور الى الجدول بنفس الصيغة والتحكم بها وتغييرها في اي وقت دون الحاجة الى عمل ذلك من خلال برنامج اصدار البطاقات التعريفية. على العموم اتمنى ان يستفاد منه احد في مشاريعه تحياتي view_add_edit_binary_image.mdb
    3 points
  4. 3 points
  5. السلام عليكم شباب 🙂 ابو بهاء مو علوم وخبر 🙂 خلونا ننسى طلب ابو بهاء ، ونشوف عمل النموذج التالي: 1. عندي جدول ، 2.1. عملت استعلام 1 لهذا الجدول qry_1 ، لأدخال البيانات ، 2.2. عملت استعلام 2 لهذا الجدول qry_2 ، للبحث ، بحيث يكون هناك معيار/معايير لحقول البحث ، وهذه المعايير تشير الى حقول النموذج ، مثل (Forms!frm_1!ID) 3. عملت نموذج يأخذ بياناته من هذه الاستعلامات ، حسب صلاحيات المستخدم: أ.1. للمستخدم العادي ، نفتح النموذج بالطريقة العادية: docmd.openform "frm_1" أ.2. لمستخدمي البحث ، نفتح النموذج للقراءة فقط: docmd.OpenForm "frm_1",,,,acFormReadOnly ب. ممكن اعمل سجل جديد ، بدون مشاكل ، بإستخدام qry_1 ج. علشان البحث ، استخدم qry_2 د. اعمل على حدث فتح النموذج ، الكود التالي: if user_Group=1 then me.recordsource=qry_1 elseif user_Group=2 then me.recordsource=qry_2 end if اعتقد ممكن استعمال هذه الطريقة لأخونا ابو بهاء 🙂 جعفر
    3 points
  6. السلام عليكم ورحمة الله وبركاته 🙂 اولا ، يجب تثبيت الموضوع 🙂 وبعدها ، هضم محتواه 🙂 واللي بعدها تطبيقه 🙂 ويا سلام عليك ، سيد بمعنى الكلمة 🙂 جعفر
    3 points
  7. السلام عليكم ورحمه الله وبركاته اخوانى الافاضل ارفق لكم ملفان يقومان بمساعدتك على تسجيل مكتبات الاكتف بعض وضعها فى مجلد النظام وجدتم اثناء بحثى عن تسجيل مكتبات طبعا معروف لدى الكثيرين الطرق اليدويه مثل cmd / next regsvr32 barcodex.ocx للنظام 32 بت 1. قم بنسخ الاداة الى مجلد C:\WINDOWS\system32 2. اذهب الى ابدأ واختر تشغيل وضع هذا الامر regsvr32 "C:\WINDOWS\system32\barcodex.ocx" للنظام 64 بت 1. قم بنسخ الاداة الى مجلد C:\WINDOWS\sysWow64 2. اذهب الى ابدأ واختر تشغيل وضع هذا الامر regsvr32 "C:\WINDOWS\sysWow64\barcodex.ocx" 3. اضغط موافق وسيتم تسجيل الاداة وظهور رسالة تفيد بنجاح عملية التسجيل احببت ان اشارككم اياهم وللتسهيل على المبتدئين مثلى تقبلوا تحياتى وتمنياتى بالتوفيق تسجيل ادوات اكتيف اكس وعند تسجيل اي اداة وذلك بالضغط بالماوس الايمن عليها ستجد هذا البرنامج موجود ضمن القائمocxdllreg.rar لتسجيل مكتبات الاكتيف اكس.zip
    2 points
  8. يا اخي هات كل طلباتك دفعة واحدة وليس بالتقسيط لقد اجبتك على سؤال (جمع عمود الكمية) في المعادلة التي كتبتها لك Subtotal 1-لحساب المتوسط استبدل الرقم 109 بالرقم 101 2-لحساب العدد استبدل الرقم 109 بالرقم 103 3-لحساب الحد الاقصى استبدل الرقم 109 بالرقم 104 4-لحساب الحد الادنى استبدل الرقم 109 بالرقم 105
    2 points
  9. الاستاذ الفاضل / ابو بسمله تمام التمام الله يفتح عليك ويرزقك الفردوس ويجعله في ميزان حسناتك ان شاء الله المثال الذي ارفقته حضرتك تمام وطبقت عندي ولله الحمد على فكرة المثال الذي ارفقته انا ليس به اي مشكله ولكى تعم الفائدة لمن يريد فاليك المثال بعد ان طبقت عليه مثال الاستاذ / احمد يوسف الله يجزاه كل خير ويرحم والديه بيانات بين تاريخين (1).accdb
    2 points
  10. وعليكم السلام 🙂 واهلا وسهلا بالدكتور حلبي 🙂 ايش رأيك اعلمك كيف تصطاد ، بدل ما اعطيك سمكة 🙂 جعفر
    2 points
  11. بس اقتراحي ما فيه تغيير في النماذج ، وبالعكس المفروض سهل عمله 🙂 جرب اقتراحي في نموذج او اثنين ، وعليه اتخاذك للقرار يكون افضل 🙂 جعفر
    2 points
  12. 2 points
  13. السلام عليكم ورحمة الله وبركاته انا احد الاشخاص الذين لا يحبذ ان يستعمل الكود في تخفيف أمان الاكسس ، فقد وضعته شركة مايكروسوفت في حزمة الاوفيس حتى تحمينا من ايدي المخربين ، وفي هذا الرابط شرحت كيفية عمل مجلد موثوق به للأكسس 2007 فما فوق: http://www.officena.net/ib/topic/66450-دمج-ملف-وتشغيله-قبل-أو-مع-بدء-اكسس/#comment-432363 المشكلة في كود تخفيف الامان ، انه لا يخفض مستوى أمان الاكسس لبرنامجك فقط ، وانما يخفض مستوى أمان جميع برامج الاكسس. ولكننا كمبرمجين لدينا مشكلتنا ، في انه اذا ارسلت برنامجك الى شخص ما ، فلا بد من التواصل معه و اعطاؤه الخطوات كما في الرابط ، وإلا فالبرنامج لن يعمل ، لان البرنامج يشتمل على الماكرو والوحدات النمطية. هنا اقدم لكم طريقة لجعل برنامجي فقط يعمل بمستوى أمان أقل ، فلا تظهر لي رسالة الأمان من الاكسس. العمل كله يدور حول كود ، ويجب حفظ الكود هذا في ملف بصيغة vbs ، والذي يجب ان نفتح برنامجنا عن طريقه. الكود يعمل على برامج الاكسس بصيغة mdb و accdb ، والمفروض ان يعمل على جميع اصدارات الاكسس 2003 فما فوق ، وعلى الاكسس 32بت و64بت (انا هنا اطلب من الشباب تجربته بإصدارات الاكسس التي يعملون عليها ، وإخبارنا بالنتيجة لوسمحتوا). اليكم طريقة العمل (رجاء انزال المرفق وفكه في المسار C:\jj ، وذلك حتى يمكنكم متابعة خطواتي): رجاء وضع البرنامج المرفق Seq.mdb حسب المسار التالي: C:\jj\Seq.mdb الآن اذهب الى المجلد C:\jj وافتح البرنامج Seq.mdb بالنقر المزدوج ، عند فتحه نرى رسالة أمان الاكسس ، وهذا متوقع ، وذلك بسبب انه في مجلد غير موثوق به (رجاء لا تضف هذا المجلد كمجلد أمان ، وانما اخرج من البرنامج). . الملف الآخر المرفق Seq.vbs ، يحتوي على هذا الكود: rem http://www.accessmvp.com/jconrad/accessjunkie/macrosecurity.html rem expression.OpenCurrentDatabase(filepath required, Exclusive optional, bstrPassword optional) dim o set o=createobject ("Access.Application") o.automationsecurity=1 ' set macro security LOW. o.opencurrentdatabase "C:\jj\Seq.mdb" o.usercontrol=true set o=nothing . تستطيع ان تجعله في اي مجلد (ممكن تجرب نسخه منه في اي مجلد شئت) ، وانقر مرتين على هذا الملف بُغية تشغيله ، سترى انه فتح البرنامج Seq.mdb ، وبدون رسالة أمان الاكسس ، وهو المطلوب ------------------------------------------------------------------------------------------------------------------------------------------- هذه الخطوة إضافية ، وهي لتحويل الملف السابق من صيغة vbs الى exe ، واختيار ايقونه للملف الجديد الآن ننتقل للخطوة التالية ، وهي ، اننا لا نريد ان ايقونة vbs ، وانما نريد ايقونه خاصة لبرنامجنا. هناك طريقتين: 1. ايقونة مختصر البرنامج Shortcut: وهي ان نعمل مختصر لملف Seq.vbs ، ولكن وللأسف مختصر ملف vbs يعطينا نفس ايقونة الملف نفسه ، وما عندنا طريقة لتغييرها!! لذلك ، سنعمل مختصر لملف الاكسس ، ونغير البيانات كالصورة التاليه ، بحيث يصبح مختصر ملف vbs يحتوي على ايقونة ملف الاكسس (طبعا يمكنك ان تغير الايقونة الى اي شئ شئت): . . . . وبهذه الطريقة غيّرنا ايقونة برنامج vbs الى ايقونه اخرى مناسبة 2. تحويل ملف vbs الى ملف تنفيذي exe ، وتختار له الايقونة التي تعجبك: رجاء انزال البرنامج المجاني Vbs to Exe من الرابط التالي: http://www.f2ko.de/en/v2e.php احد اسباب اختياري لهذا البرنامج ، اننا نستطيع التحكم به عن طريق Commandline ايضا ثم نتبع الخطوات التالية: ونستطيع ان نعمل لبرنامج vbs هذا كلمة سر كذلك ، . في الخطوة 6 تستطيع ان تكتب معلومات شركتك ، ونختار الايقونه التي نريدها للبرنامج (الخطوة 5) . . وتستطيع ان تجعله على سطح مكتب كمبيوترك الميزة في هذه الطريقة ، ان المستخدم لن يعرف مكان برنامج قاعدة البيانات Seq.mdb ، ولن يعرف الكود الذي كان في Seq.vbs ارجو ممن يضع ردا على الموضوع ، ان يذكر: 1. اذا اشتغل البرنامج على كمبيوتره ، 2. نسخة الاكسس التي يستخدمها. ملاحظة: الظاهر ان بعض متصفحات الانترنت حجبت انزال المرفق Seq.zip ، وذلك بسبب احتوائه على ملف vbs ، والذي يستخدمه الكثيرون لتخريب الكمبيوتر ، لذلك ، ارفق لكم Seq_2.zip والذي يحتوي على نفس ملفات Seq.zip ، ولكني غيرت صيغة الملف Seq.vbs الى Seq.txt . بعد انزال المرفق وفك ملفاته في الكمبيوتر ، رجاء تغيير مسمى الملف Seq.txt الى Seq.vbs جعفر Seq.zip Seq_2.zip
    1 point
  14. فورم اكسل استدعاء بيانات وصور العاملين الفيديو الصور الملف على الرابط التالى http://www.mediafire.com/file/r92gpfff79v1wgz/بيانات+وصور+الموظفين.rar
    1 point
  15. استاذي ربنا يكرمك ويكرم اصلك يارب تري اولادك كما تحب عينك اشكرك اخي الفاضل واشكر المنتدي الكبير القيمة والقامة وجعلة الله في ميزان حسناتك امين يارب العالمين
    1 point
  16. جزاك الله خيرا أستاذ / أحمد الفلاحجى مشكور
    1 point
  17. رزقكم الله أسمى مراتب الدنيا وأعلى منازل الجنة وجعلكم ممن طال عمره وحَسُنْ عمله وبُورك له في رزقه وماله وصحته وعافيته وأولاده وأهله
    1 point
  18. الف شكر استاذنا الكريم الهدف الاسمى اننا نتعلم منكم وليس النسخ واللصق كنت سالك عن الرقم 109 ماذا يعني ؟ من اجل ان تعم الفائدة للجميع فعلا هذا هو ما احتاج 1-لحساب المتوسط استبدل الرقم 109 بالرقم 101 2-لحساب العدد استبدل الرقم 109 بالرقم 103 3-لحساب الحد الاقصى استبدل الرقم 109 بالرقم 104 4-لحساب الحد الادنى استبدل الرقم 109 بالرقم 105
    1 point
  19. حبيبى واستاذي ومعلمى / الاستاذ جعفر هلا وغلا يعطيك الف عافية فعلا تعلم الصيد افضل بكثير مثال في منتهى الروعه والابداع والشرح وافى جدا وتعدد الافكار فيه كثيرة اسف لك لم ارى مشاركتك الا بعد ان قمت بالرد علي الاستاذ / ابو بسمله رحم الله والديك استاذي / جعفر وغفر لك وجعله في ميزان حسناتك اخى وحبيبى وخبيرنا الاستاذ / خالد ايضا لم اري مشاركتك الا بعد ان قمت بالرد ربنا يارب يبارك فيك ويجعلك خير مساعد لنا ويرزفك من غير حساب ويرحم والديك في الدنيا والاخره اخواني الاعزاء كم انتم اعزاء علي قلبي ربنا يفتح عليكم كمان وكمان لكم كل الاحترام والتقدير
    1 point
  20. الحمدلله اللذى بنعمته تتم الصالحات تصدقوا اول مره انزل المثال لم يفتح والان فتح ههههههه معلش اخى خالد العتب ع النظر والجهاز والله ههههههههههههه واحنا بنتعلم منكم اساتذتنا الافاضل تمنياتى للجميع بالتوفيق
    1 point
  21. جرب المرفق بنفس الكود الى اشار له استاذنا @أحمد الفلاحجى علما باني لم اشاهد اي مشكلة بملفك العتب على النظر بيانات بين تاريخين.accdb
    1 point
  22. 1 point
  23. السلام عليكم اخى الفاضل ملفك به مشكله ارفق لك مثال لاستاذنا يوسف احمد جزاه الله خيرا لعلك تستفاد منه وتستطيع تنفيذه ع ملفك تقبل تحياتى وتمنياتى بالتوفيق بين تاريخين يوسف احمد.rar
    1 point
  24. هو ده المطلوب بالضبط استاذ سليم ربنا يبارك لك فى رزقك وفى اولادك وفى علمك ورزقك ان شاء الله الجنة
    1 point
  25. لا أعلم اذا كان هذا المطلوب super filter.xlsm
    1 point
  26. وعليكم السلام لا توجد هذه الدالة الا فى أوفيس 365 وهذا بمقابل مادى فيمكنك عوضا عن ذلك تجربة هذا الملف الكبير -وهنا ايضا رابط لفيديو الشرح VLOOKUP Assistant – Preview بارك الله فيك Vlookup-Assistant.xlsm
    1 point
  27. علم على الثلاث خلايا بالماوس اذهب الى التنسيق الشرطى فى القوائم الاعلى سترى ماحدث
    1 point
  28. هلا أخ ابو زاهر جرب وعطنا النتيجة 🤤 ::بالتوفيق::
    1 point
  29. أحسنت استاذنا الكريم عمل ممتاز وشرح مستفيض بارك الله فيك وزادك الله من فضله
    1 point
  30. وعليكم السلام ابو عبدالله 🙂 سؤالك غير واضح ، يا ريت تعمل مثال من بياناتك في ورقة اكسل/وورد مثلا 🙂 جعفر
    1 point
  31. السلام عليكم ارفق كم حالة اكثر من موظف في شيت المكملون مع البيانات المطلوبه بشكل يدوي الذين استوفو الشروط التي ذكرتها وان توفر الوقت ابشر تحياتي
    1 point
  32. تم إنشاء موضوع جديد خاص بالاتصال بالسيرفر فى هذا الرابط
    1 point
  33. هل رأيت المرفق بالرد السابق اليس هو المطلوب هل وجدت به مشكلة ما! علي كل تفضل هذا التعديل فقد قمت ببعض الاصلاحات علي المرفق السابق. أما عن سؤالك الآخر أعتقد أنه لا داعي لاستخدام موقع المؤشر لتصنع شئ بالاعتماد عليه - ويغنيك عن هذا أن تضع الكود الذي تريد خلف حدث عند مرور الموس (on mouse move) لأن موقع المؤشر يتحكم فيه أبعاد الفورم وكذلك موقع الفورم من الشاشة وهذا ما سيتغير من جهاز لآخر وكذلك سيتغير مع تصغير وتكبير الفورم مما يصعب معه التحكم في تنفيذ الكود (هذا علي حد علمي) ان لم يكن لأساتذتنا رأي آخر. 111.accdb
    1 point
  34. وعليكم السلام-جرب هذا الملف فيه طلبك Create-Hyperlinked-List-of-Files-in-Subfolders.xlsm
    1 point
  35. آسف علي التأخر هنا توضيح للفكرة قم بتشغيل الاستعلام Query1 أولا ثم قم بتشغيل الاستعلام Q_thdeeth ولا تنسي الاطلاع علي البيانات قبل التغير لتري أثر التحديث - وكذلك أخذ نسخة احتياطية من الجداول لاعادة التجربة مرة أخري. والآن يبقي لتمام العمل انشاء استعلام حذف لبيانات الجدول Table1 بعد الانتهاء من التحديث - وهذا سهل عليك انشائه لذي لم انشأه ومن باب النصح هذه الاستعلامات الكثيرة ستعمل علي زيادة حجم قاعدة البيانات لذي ستكون محتاجا لاجراء ضغط واصلاح بين الحين والحين. والآن مع المثال ولا تنسي اخبارنا بالنتائج لديك. مثال_اوفيسنا_استعلام_تحديث_من_استعلام_تجميع.accdb
    1 point
  36. السلام عليكم جرب الحيلة التالية (إن شاء الله تعمل معك): - فتح الاختيار "ملف" - النقر على "خيارات" (بالأسفل وأقصد بها خيارات الإكسيل) - اختيار "خيارات متقدمة" - البحث عن "عام" والقيام بإزالة العلامة من أمام الاختيار الأول والذي أعتقد أنه (بتحفظ): "تجاهل التطبيقات الأخرى التي تستعمل تبادل البيانات الديناميكي" ليس لي فكرة أخرى...
    1 point
  37. جميل جدا يعيطيك العافية تم التطبيق بنجاح احسنت
    1 point
  38. السلام عليكم في هاتين الخليتين (ذكور - إناث) أبدل الجزئية 1 - بـ 3 - مثل ما فعلت في المرفق... بن علية حاجي 123.xls
    1 point
  39. أخي @محمد صلاح1 أسمع مني رعاك الله اعتقد اني كنت مثلك هكذا سابقاً هذه نصيحة لتستفيد عن تجربة قد يكون كل كلامك صحيح .. المشكلة ليس في طلبك ... بل في أستخدام العبارات الذي توحي للقارء السطور أنك عنيف في كلامك .. قبل أن ترد قم بشكرة على عملة ومحاولته وجهدة ..لأنه فرغ من وقته وقد يكون لدية أعمال فأجل أعمالة أبتغاء وجه الله في حل مشاكل الاعضاء وأنت منهم .. أخفض من أسلوب كلامك واجعل فيه التواضع والرحمة فنحن مسلمون .. وفي الأخير أنت طالب علم يكفي أن غيرهم لا يعطيك معلومة ألا بمقابل .. أما هم فقد أبتغو الاجر عند الله وللعلم يسؤني جداً أني أرى من طلاب العلم أنه لا يحسن ألفاضه مع معلمة في أي نواحي الحياة أعلم أنك مهما عملت لن تفي في حق أساتذتنا الأجلاء الذي ننظر لهم كالجبال الرواسي .. في هذا المنتدى الشامخ ومنهم الذي بلغ علمة الافاق تجد عبارات متواضعة يوضع نفسة كأنه طالب علم كأستاذي الغلي @ابا جودى
    1 point
  40. تفضل دالة نقل بيانات.xlsm
    1 point
  41. السلام عليكم ورحمة الله قمت ببعض التعديلات على الملف (تغييرات لبعض الرموز - إضافة جدول مساعد في ورقة "الأقسام" سميته "إسناد الأساتذة على الأقسام حسب المواد" - إضافة بعض المعادلات المناسبة...). في جدول توقيت الأساتذة يجب اعتماد الترميز التالي فيما يخص مادة "التربية الإسلامية" وحصة "الدعم في المواد": - بالنسبة لمادة التربية الإسلامية يجب استعمال الترميز : "اسلا+فراغ+رمز القسم"، مثال : اسلا 1م1 (وهو رمز لحصة التربية الإسلامية لقسم 1م1) - بالنسبة لحصة الدعم يكون الترميز التالي : "رمز القسم+فراغ+رمز المادة المختصر"، مثال: 1م1 عر (وهو رمز لحصة دعم لقسم 1م1 في مادة اللغة العربية) الرموز المختصرة للمواد : لغة عربية: عر ، فرنسية: فر ، انجليزية: انج ، اجتماعيات: اجت ، رياضيات: ريا ، تربية إسلامية: اسلا ملاحظة: لا يمكن فصل خلية إمضاء الأستاذ إلى جزئين لحصتي أ. م.فر/انج أو أ. م.عر/ريا باستعمال المعادلات... أرجو أن يفي الملف بالمطلوب وتجدني إن شاء الله في الخدمة لأي تساؤل أو تعديل آخر... أخوك بن علية حاجي ورقة الغياب.xlsm
    1 point
  42. الأخ الفاضل من الأفضل فى هذه الحالة أن تحدد خصائص الطباعة التى تريدها فى كود برمجى تحدد فيه كافة الخصائص مثل : الهوامش وزووم الصفحة ونطاق الطباعة ونوع الطباعة أفقى أم عرضيا إلى آخر هذه الخصائص أو تسجل ماكرو جديد به كل خصائص الطباعة التى تناسب الملف ويتم ربطة بزر تطبيق ( طباعة ) حتى تتمكن من تطبيق كافة الخصائص المحددة على أى جهاز أو وندوز آخر تقبل تحياتى
    1 point
  43. السلام عليكم هو كود "الترحيل" نفسه مع تعديل طفيف جدا ثم ربطه بزر "الحذف"... بن علية حاجي تواتي3.rar
    1 point
  44. تفضل بدون سجلات التاريخ الفارغة Between (IIf(Len([Forms]![main]![Datamasterform]![DateX] & "")=0,#01-Jan-1900#,[Forms]![main]![Datamasterform]![DateX])) And (IIf(Len([Forms]![main]![Datamasterform]![DateX] & "")=0,#01-Jan-2900#,[Forms]![main]![Datamasterform]![DateX]+65)) والشرح Between (IIf(Len([Forms]![main]![Datamasterform]![DateX] & "")=0,#01-Jan-1900#,[Forms]![main]![Datamasterform]![DateX])) And (IIf(Len([Forms]![main]![Datamasterform]![DateX] & "")=0,#01-Jan-2900#,[Forms]![main]![Datamasterform]![DateX]+65)) مع سجلات التاريخ الفارغة Between (IIf(Len([Forms]![main]![Datamasterform]![DateX] & "")=0,#01-Jan-1900#,[Forms]![main]![Datamasterform]![DateX])) And (IIf(Len([Forms]![main]![Datamasterform]![DateX] & "")=0,#01-Jan-2900#,[Forms]![main]![Datamasterform]![DateX]+65)) Or [DateX] Is Null والشرح Between (IIf(Len([Forms]![main]![Datamasterform]![DateX] & "")=0,#01-Jan-1900#,[Forms]![main]![Datamasterform]![DateX])) And (IIf(Len([Forms]![main]![Datamasterform]![DateX] & "")=0,#01-Jan-2900#,[Forms]![main]![Datamasterform]![DateX]+65)) Or [DateX] Is Null جعفر
    1 point
  45. أخي محمد الربكة عندك في And و Or ، فرجاء مراجعة عملهم بالضبط. رجاء عمل التالي: 1. وانت في النموذج ، اضغط على زرّي لوحة المفاتيح: Ctrl + G 2. وسيأخذك الى صفحة الكود ، وستلاحظ نافذة صغيرة في اسفل صفحة الكود ، 3. السطر التالي ، احذف اول اشارة من سطره ، الاشارة: ' 'Debug.Print myCriteria' 4. اذهب للنموذج واعمل التصفية التي تريدها 5. ارجع لصفحة الكود ، وستلاحظ في النافذة الصغيرة وجود كود التصفية 6. انسخ هذا الكود 7. اعمل استعلام فارغ 8. بالزر اليمين في الاستعلام ، غيّر الاستعلام من تصميم الى SQL 9. احذف الكلمات الموجودة في الاستعلام ، والصق كود النموذج 10. شغّل الاستعلام ، وشوف نتائجه 11. ضع الاستعلام في وضع تصميم ، وشوف تفاصيله ، وهي التفاصيل التي قمت بها انت لتصفية النموذج. 12. العب في And و Or للحقول التي تريدها ، وسوف تعرف ايهم تستعمل والانسب لعملك ، وعليه ترجع لكود تصفية النموذج وتغيّر فيه حسب طلبك ************************* هذا الموضوع هو انشاء تصفية ولعدة حقول ، والحمدلله استطعت انت ان تجرب النتائج جعفر
    1 point
  46. وعليكم السلام المفروض ان الاكسس يعطيك كود مثل هذا: ([testQ].[datex] between #01-Jul-17# and #27-Apr-17#) AND ([testQ].[country1]= 'اسكندرية' or [testQ].[country1]= 'الدقهلية' or [testQ].[country1] is null) اليك الكود ، وقد فككته الى اصغر مكوناته وانت اعمل المدرسة Dim City As String City = "اسكندرية" City2 = "الدقهلية" 'مجموعة اوامر الحقل الاول 'للتاريخ myCriteria = "(" myCriteria = myCriteria & "[testQ].[datex] between #" & Me.DateX & "# and #" & Me.DateX - 65 & "#" myCriteria = myCriteria & ")" 'مجموعة اوامر الحقل الثاني myCriteria = myCriteria & " AND " myCriteria = myCriteria & "(" 'للنص myCriteria = myCriteria & "[testQ].[country1]= '" & City & "'" myCriteria = myCriteria & " or " myCriteria = myCriteria & "[testQ].[country1]= '" & City2 & "'" myCriteria = myCriteria & " or " myCriteria = myCriteria & "[testQ].[country1] is null" myCriteria = myCriteria & ")" 'للرقم 'myCriteria = myCriteria & " AND " 'myCriteria = myCriteria & "[testQ].[ID]<> " & Me.ID 'Debug.Print myCriteria Me.TestF.Form.Filter = myCriteria Me.TestF.Form.FilterOn = True جعفر
    1 point
  47. هذا مثال مبسط و به الشرح لتصدير البيانات الي مكان محدد فى ملف وورد يتم انشاءه بناء علي قالب فى مكان محدد و تعتمد الفكرة علي عمل bookmark فى المكان المطلوب التصدير اليه في قالب الوورد ، و من ثم الارسال اليها و الكود أصلا من موقع أجنبي وضعه أحد الاخوة طالبا التعديل فيه ، علي برنامجه ، و هذه هي آخر نسخ التعديل علي برنامجه للتعامل مع الوورد . مع تحياتي sendtoword_abuwaleed_taher_5.rar
    1 point
×
×
  • اضف...

Important Information