أ / محمد صالح

جرب هذا الكود If MsgBox("هل حقاً تريد إكمال العملية؟", 1572900, "تحذير") = vbYes Then docmd.setwarnings false DoCmd.OpenQuery "upT" DoCmd.OpenQuery "upB" DoCmd.OpenQuery "upC" DoCmd.OpenQuery "upD" DoCmd.OpenQuery "upE" DoCmd.OpenQuery "upEX" DoCmd.OpenQuery "delT" DoCmd.OpenQuery "delB" DoCmd.OpenQuery "delC" DoCmd.OpenQuery "delD" DoCmd.OpenQuery "delE" DoCmd.OpenQuery "delEX" docmd.setwarnings true End If

يمكن تعدد حقول وجداول جملة select بمعنى أنه يمكننا الاستعلام من أكثر من جدول مثال على ذلك SELECT orders.order_id, suppliers.name FROM suppliers, orders WHERE suppliers.supplier_id = orders.supplier_id; ويكون ذلك باستعمال النقطة بين اسم الجدول واسم الحقل والاستعلام المذكور يعرض اسم المورد ورقم أمر الشراء في حالة تساوي رقم المورد في الجدولين

أخي الكريم أذا كنت تستعمل نظام التشغيل ويندوز 7 وعموما يوجد مشكلة في تسجيل المراجع في ويندوز 7 حيث تحتاج عملية التسجيل إلى صلاحيات المدير المسئول ولذلك لتسجيل الأداه قم بالضغط على start ثم اكتب cmd في مربع البحث عن البرامج وحينما يظهر سطر الأوامر اضغط بزر الفارة الأيمن عليه واختر Run as Administrator وبعدها شغل الأمر التالي فيه ثم اضغط انتر regsvr32 Msinet.ocx وبإن الله سوف تأتيك رسالة النجاح في التسجيل ..... جرب وأخبرني بالنتيجة

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

شكرا لك أخي دغيدي ولكن يبدو أن الرابط به خلل وهذا رابط آخر لك أخي الكريم http://www.kutub.inf.../search?q=excel وهذا رابط آخر http://www.kutub.info/books/search?q=%D8%A7%D9%83%D8%B3%D9%84 أتمنى أن يفيدك

يا ريت مزيد من التوضيح

طلباتك أخي الكريم تم عمل اللازم تجده هنا http://www.officena.net/ib/index.php?showtopic=39163&view=findpost&p=216327

ويمكنك تنفيذ كل هذه التعليمات الوارد ذكرها في الصفحة المشار إليها بهذا السطر من الكود CreateObject("WScript.Shell").RegWrite "HKEY_CURRENT_USER\Software\Microsoft\Office\" & Application.Version & "\Common\Security\DisableHyperlinkWarning", "1", "REG_DWORD" كل عام أنتم بخير

هل تم حل المشكلة؟ وكيف؟

بارك الله فيك أخي محمد يحياوي وهذا هو الكود العكسي إلغاء تثبيت وظيفة إضافية sub UnInstall_Addin() Dim oXLAddin As AddIn For Each oXLAddin In Application.AddIns If oXLAddin.FullName = "C:\MyAddIn.xla" Then oXLAddin.Installed = False End If Next oXLAddin End Sub وكل عام أنتم بخير

بارك الله فيك أخي قصي ولكن واجهتني مشاكل مع ويندوز 7 لم يعمل معي كما ينبغي

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

ما فائدة الدوس بالنسبة للويندوز؟ تنفيذ اوامر بدون واجهة رسومية أو إمكانية استعمال سطر الأوامر في تنفيذ أوامر من خلال برامج أخرى هذا هو نفس دور mysql console التحكم في قواعد البيانات بدون واجهة رسومية كما يمكن استعماله داخل برامج أخرى لتنفيذ استعلامات عبر mysql والله أعلم

شكرا لك أبا أحمد على مرورك الكريم وكل عام أنتم بخير

أخي الفاضل محمد يحياوي كل عام أنتم بخير أنا أستعمل أوفيس 2010 وهذا ما يحدث عندي بالصور هذه صورة الإعدادات قبل تشغيل الملف وعند فتح الملف لأول مرة تظهر رسالة تمكين المحتوى وبعد تمكين المحتوى وعمل الملف هذه صورة الإعدادات ...... ومن الطبيعي عملية تمكين المحتوى لأول مرة لأن هذا كود ولكي يعمل يجب تمكينه وإلا كيف سيعمل كيف يتم استدعاء ملف الريجيستري ليعمل قبل ملف الإكسل بطريقة لايشعر بها المستخدم؟ وطبعاً يتم ذلك في أول مرة فقط وليس في كل مرة يتم فتح الملف فيها

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

عذرا أخي الكريم م / محمد طاهر لم أنتبه لموضوع توضيح معنى الاسم ... الاسم المستعار mas هو اختصارات لاسمي mohamed abd-elgawad saleh ومنذ تعلمي للغة الإنجليزية في الصف الأول الإعدادي استعملت هذا اللفظ للتوقيع باسمي على أي رسومات أرسمها فالحمد لله عندي موهبة الرسم وكنت أحصل في الرسم على 19 أو 20 من 20 حتى كانت المدرسة كلها تناديني ب ماس (رغم اعتزازي ضمنيا باسمي محمد واسم والدي واسم عائلتي) وعندما بدأت أتعامل مع الويندوز واسماء المستخدمين اختصارا كنت أجعله mas وكذلك في user name في الأوفيس mas وكذلك في الشبكة network أما حكايتي الأرقام 1 ثم 2 ثم 3 وليست مائة وثلاثة وعشرون كما ينطقها البعض فهذه حكاية التدرج فكلنا نبدأ صغاراً (1) ثم نكبر ونتعلم (2) ثم نتقن ونبدع (3) فأتمنى من الله أن نكون حصلنا ولو جزء بسيطاً من هذا التدرج ........ وزاد إعجابي بالاسم وبالتدرج معنى الماس في اللغة العربية الماس : أغلى الأحجار الكريمة وأشدها صلابة وأكثرها شفافية يؤثر في غيره ولا يتأثر بغيره. وفي الأخير أجدد الاعتذار عن التأخير وكل عام وجميع الإخوة بكل خير أخوكم Mas123

لا حلوة إزاي فاتت عليّ؟ خلاص نخليها 11 يتوقيت جرينتش عندنا في مصر 1 بعد الظهر علشان نكونوا عيدنا على أهالينا وكل عام والجميع بكل خير

أشكركم أخوتي في الله جعلني الله عند حسن ظنكم وكل عام أنتم جميعا بكل الخير اللهم علمنا ما ينفعنا وانفعنا بما علمتنا

مفيش أحسن من بعد صلاة العيد مباشرة كل عام أنتم جميعاً بخير

شكرا لك أخي lording وفقك الله لكل ما يحب ويرضى وكل عام أنتم بخير

كل عام أنت ومن تحب بكل خير أخي نادر شكرا لمرورك الكريم

عارف أنا نفسي في إيه أستاذ نارت؟؟ ما شاء الله حضرتك عندك مكتبة أتمنى أن تكون عندي وفقك الله لكل الخير وكل عام أنتم بخير

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

بسم الله الرحمن الرحيم ............ والصلاة والسلام على رسولنا الكريم ............ أحببت أن أقدم هدية لأحبابي أعضاء وزوار منتدى أوفيسنا ملتقى مبرمجي الأوفيس العرب المدرسة الأولى التي تعلمت منها اساسيات برمجة الأوفيس وخاصة الإكسل فتوكلت على الله وقمت بعمل أبسط كود لتخفيض أمان الأكسس برمجياً لجميع إصدارات الأوفيس حتى التي لم تصدر منها بعد **************** ولقد تعلمت في هذا الصرح أن المبرمج الحق الذي يؤدي ما هو مطلوب بأقل كود ممكن بل قل بأقل عدد لحروف الكود إن أمكن //////////////////////// وكنت قد أصدرت قبل ذلك ملفات كثيرة صغيرة الحجم جداً وتؤدي مهام كبيرة جداً سميت هذه السلسلة ما خف وزنه وغلا ثمنه كان منها على سبيل المثال القرآن بالصوت والصورة إرسال البريد من الأكسس مباشرة أصغر كود لقراءة وتغيير دقة الشاشة وغيرها الكثير +++++++++++++++++ وأخيرا وليس بآخر أتقدم بالشكر لكل من ساهم في حل هذه المشكلة على كل ما قدموه في هذا المجال //////////////////////////////////////// وبناء على النقاشات الممتعة للإخوة الذين ظهرت معهم رسائل خطأ في بعض الأحيان تم اختصار الكود أكثر مما هو عليه ليصبح سطرا واحداً CreateObject("WScript.Shell").RegWrite "HKEY_CURRENT_USER\Software\Microsoft\Office\" & Application.Version & "\Access\Security\" & IIf(Application.Version < 12, "Level", "VBAWarnings"), "1", "REG_DWORD" ........... ويوجد مرفق جديد به الملف بعد اختصار الكود وجعله سطرا واحدا ولا تنسوا أخاكم محمد صالح من صالح دعائكم MasAcessSecurity_mdb.rar MasAcessSecurity2.rar