اذهب الي المحتوي
أوفيسنا
بحث مخصص من جوجل فى أوفيسنا
Custom Search

capitala

عضو جديد 01
  • Posts

    22
  • تاريخ الانضمام

  • تاريخ اخر زياره

كل منشورات العضو capitala

  1. السلام عليكم ورحمة الله وبركاته، لقد قمتُ بتحرير عدد كبير من كود VBA داخل word 2033 ، وأغلبها مربوط بقاعدة بيانات Access 2003. ثم قمت بترقية قاعدة البيانات إلى access 2016 مع بقاء الوورد على النسخة القديمة. والآن أغلب الكود لا يعمل مع access 2016 خصوصا (index) و (seek) ما الطريقة المثلى للاتصال بقاعدة البيانات الجديدة؟ وافر الاحترام والتقدير سلفا
  2. السلام عليكم ورحمة الله وبركاته، كيف يمكن عمل جدولة مثل (ٍsummary of certificates) في الملف المرفق بحيث لو زدنا أية كلمات عليها تنزل سطرا جديدا دون التكملة في النص المقابل لها. بمعنى آخر كأنه جدول ولكن بدون استخدام الجداول مع الشكر
  3. السلام عليكم ورحمة الله وبركاته. أريد كود VBA لتشغيله مع word لمعرفة إن كان محتوى حافظة ويندوز Clipboard صورة أم نص؟. علما بأنني أستخدم word 2003 مع خالص تقديري وشكري واحترامي.
  4. السلام عليكم، أحاول الوصول إلى قاعدة بينات (mdb) من برنامج وورد 2016 وأستخدم الكود التالي: dim db as database ، dim rst as recordset فأجد رسالة: run-time error '4029' activex component can't create object قمت بتغيير as database إلى dao.database وكذلك rst ولم تفلح المحاولة، ثم فحصت الـ References ووجدتها كافية أرجو المساعدة بأفضل طريقة لحل المشكلة أو كود استدعاء بيانات من قاعدة بيانات (MDB) أو (ACCDB) مع الشكر
  5. خالص الشكر على هذه الأفكار. ولكن أنا عندي أوفيس 2013، والبرنامج يطلب الإصدار 2010، هل هناك نسخة للإصدار 2010؟ وافر الاحترام والتقدير
  6. السلام عليكم ورحمة الله وبركاته، في البداية أشكركم جزيل الشكر على مجهوداتكم الرائعة. لقد قمت بإنشاء Ribbon مخصص باسم "Reports and Emails" وأحاول إظهاره باستخدام الكود التالي DoCmd.ShowToolbar "Reports and Emails", acToolbarYes ولكني أحصل على رسالة " .... can't find the toolbar "Reports and Emails" يرجى التكرم بالمساعدة، مع الشكر
  7. السلام عليكم ورحمة الله وبركاته أنا أربط الجداول في BE باستخدام الكود التالي: نهاية الكود strSourceTableName = "maintable" strLinkName = strSourceTableName strConnect = "MS Access;PWD=" & strPassword & _ ";DATABASE=" & strDbFile وكنت أريد أن يكون الجدول الذي يتم ربطه في وضع القراءة فقط (Read Only) بحيث لا يستطيع أحد التعديل عليه يدويا. بل يتم التعديل من خلال كود على قاعدة البيانات الأصلية مع الشكر
  8. شاكرين جهودكم، وفقكم الله لما فيه الخير دائما
  9. السلام عليكم، إنني أستخدام جداول من Back end database في نموذج من FE المشكلة أني استخدم الصيغة التالية: Dim db As Database Dim rst As Recordset Set db = CurrentDb Set rst = OpenForSeek("client_master") rst.Index = "client_id" rst.Seek "=", client_ID وهذه هي الدالة OpenforSeek Set OpenForSeek = DBEngine.Workspaces(0).OpenDatabase _ (Mid(CurrentDb().TableDefs(TableName).Connect, _ 11), False, False, "PWD="narsing").OpenRecordset(TableName, _ dbOpenTable) وأحصل حاليا على رسالة: not a valid file name ، علما بأن قاعدة البيانات BE تحتوي على كلمة مرور أرجو المساعدة للأهمية
  10. الأخ ناقل المحترم. قمت بربطها يدويا ولما حاولت تجربة الكود للبحث في الجداول تعطيني الرسالة التي أشرت إليها مع الشكر
  11. السلام عليكم ورحمة الله وبركاته قمت بربط جداول من قاعدة بيانات خارجية. وأستخدم الكود التالي لاستدعاء البيانات Dim DB As Database Dim rst As Recordset Set DB = CurrentDb Set rst = DB.OpenRecordset("fmaster") rst.Index = "ب_id" rst.Seek "=", f_ID ولكن البرنامج يعترض على (Index) و (seek) بعدها قمت بتغيير as database إلى as DAO.database ولكن نفس الخطأ كما يلي: (Operation is not supported for this type of object) شاكرين جهودكم الرائعة
  12. أخوي الكريم @ابا جودى قاعدة البيانات عندي accdb أنا جربت الكود اللي حضرتك تفضلت ووضعته. ولا توجد أي نتيجة على الإطلاق. هل هناك موضع معين في الكود يجب أن أذكر فيه اسم قاعدة البيانات (BE)؟ وهل يجب تحديد الجداول التي سيتم ربطها أم أن الكود يربط جميع الجداول؟ مع الشكر مرة اخرى
  13. بناء على نصيحة أحد أعضاء المنتدى المحترم. قمنا بفصل النماذج عن الجداول والاستعلامات ولكن، كيف يمكنني أن أعرض بيانات في نموذج ويستمد بياناته من جدول في قاعدة البيانات في الـ Back End ونفس الشي بالنسبة للـ ComboBox عايزه يظهر على نموذج ولكن يستمد بياناته من قاعدة البيانات الخلفية. مع الشكر
  14. شكرا أيها الفائق الاحترام. جزاكم الله كل خير وأكرمكم بعظيم كرمه وزادكم من علمه
  15. أخي @Eng.Qassim المحترم الدالة رائعة ولكنها لم تراعي تباين عدد أيام الشهر. فمثلا: الفترة من 1 فبراير 2021 إلى 28 فبراير 2021 هي في الحقيقة وحسب التقويم الميلادي شهر كامل وليست 28 يوم. وأرجو من حضرتك خدمة أخيرة لو تكرمت، هل هناك إمكانية أن توافيني بكود أو Query يقوم بتحويل الفترة بين D1 و D2 إلى فترات بمعنى: إذا كان D1 هو 5 يناير 2021 و D2 هو 20 أبريل 2022. كيف نقوم بتقسيمها إلى فترات بحيث تبدأ الفترة الأولى من D1 (5 يناير في هذا المثال) وتنتهي بعد شهر (4 فبراير في هذا المثال)، وهكذا حتى نصل إلى آخر فترة، سيكون هناك أيام أقل من الشهر (الفترة من 5 أبريل إلى 20 أبريل) في آخر سجل؟ مع الشكر والاحترام والتقدير لجهودكم
  16. السلام عليكم ورحمة الله وبركاته، إخواني الكرام، عندي تاريخين (تاريخ البدء) و(تاريخ الاتتهاء) كيف يمكن فصل الفرق بين التاريخين إلى عدد سوات، وشهور وأيام مثال: إذا كان التاريخ الأول 1/1/2021 والتاريخ الثاني 24/3/2022 المطلوب: فصل الفرق بين التاريخين ليكون مثلا: 1 سنة، و2 شهر، و25 يوم مع الشكر مقدما لحضراتكم.
  17. شكرا على الرد. بالنسبة للحماية عن طريق كلمة مرور، هناك برامج كثيرة جدا تقوم بكسر أو إظهار كلمة المرور بالنسبة لطريقة حضرتك هي فعلا رائعة، وسوف أكون في غاية الامتنان لو حضرتك عملت نموذج مصغر منها خالص الاحترام والتقدير
  18. بكل بساطة، يستطيع المستخدم ضغط مفتاح shift ليتفادى أول نموذج يتم تشغيله تلقائيا وبالتالي أصبحت الجداول متاحة أمام المستخدم وله أن يغير فيها ما يشاء. أو بطريقة أخرى، يمكنه استيراد بعض الجداول من قاعدة البيانات. كيف يمكن منع المستخدم من القيام بذلك؟ مع الشكر مقدما
×
×
  • اضف...

Important Information