rawya

أهلا اخي رضوان أشكرك وبانتظار الرد فقد سبب لي الموضوع حالة من القلق :(

السلام عليكم و رحمة الله .. لدي مشكلة بسيطة وأرجو ممن لديه الحل ان يفيدني .. مشكلتي هي مع حرف التاء ، فجملة المقارنة like في الأكسس لا تفرق بين التاء المربوطة والتاء المفتوحة ، فبمحاولة البحث عن كلمة صلاة مثلاً : تظهر لي أيضاً الجمل التي بها صلات.. فما الحل برأيكم .. وجزاكم الله خيراً

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

اخواني الكرام .. هل لديكم فكرة لماذا يهتز النموذج عند فتحة عندما اضفت صورة كخلفية للنموذج ؟ ما هو الحل برأيكم .. صدقوني لقد حيرني الاكسس وعذبني فكلما اخطو خطوة لتعديل برنامجي أجد ان امرا ما لم يعد يعمل أو ان كارثة حصلت للبرنامج :) :) :) :) بانتظار مساعدتكم .. أثابكم الله ونفعكم بما علمكم

جزاك الله خير :(

شكرا اخي الكريم على الرد .. جربت الطريقة وهي تعمل لكن ليس كما هو ظاهر في الصورة وهو ما اريد .. فالكلمات تبدو بعيدة عن بعضها .. اي ان التنسيق يتم باضافة فراغات بين الكلمات وليس تمديدها :( بانتظار تعليقكم

السلام عليكم ورحمة الله وبركاته .. تحياتي .. أواجه مشكله أرجو ان تساعدوني فيها جزاكم الله خيرا احاول تنسيق الشعر في برنامج وورد وجربت اكثر من طريقة وجدتها في الوصلة التالية بالمنتدى http://www.officena.net/ib/index.php?showtopic=197&st=0 ولكنها لا تعمل ، علما بأني استخدم اوفيس 2003 حاولت اضافة الماكرو لكن يظهر لي خطأ في الكود .. وفي الحقيقة اريد ان يكون التنسيق مباشرة في البرنامج باستخدام ماكرو او اي طريقة اخرى.. اي لا اريد استخدام برنامج آخر

أخي الفاضل .. بما أن الحقل عبارة عن رقم فيجب التخلص من علامتي التنصيص ليصبح الكود بالشكل التالي docmd.runSQL "UPDATE employeeTbl SET grade= " & me.grade & " WHERE employeeSno = " & me.employeeNo

أعتذر فما زال الكود ناقصاً حيث يجب تحديد الشرط وهو الرقم ( المفتاح الرئيسي للموظف ) لتعيين الحقل الذي سيتم به التحديث docmd.setwarning 0 docmd.runSQL "UPDATE employeeTbl SET positioin='" & me.postion & "' WHERE employeeSno = " & me.employeeNo" docmd.runSQL "UPDATE employeeTbl SET grade= '" & "' WHERE employeeSno = " & me.employeeNo docmd.runSQL "UPDATE promotionTbl SET date = " & date() & " WHERE promotionSno = " & me.promotionNo

تحياتي أضف الكود التالي بعد التحديث في نموذج الترقيات ، حيث افترض انك تعمل عليه وتريد في نفس الوقت تحديث البيانات في جدول الموظفين.. بإعتبار ان me.positon me.grade هي حقول موجودة على النموذج ويمكنك استبدالها بأي قيم خاصة تحدد الوظيفة والدرجة docmd.setwarning 0 docmd.runSQL "UPDATE employeeTbl SET positioin='" & me.postion & "'" docmd.runSQL "UPDATE employeeTbl SET grade= '" & me.grade & "'" docmd.runSQL "UPDATE promotionTbl SET date = " & date() أرجو ان يكون هذا هو المطلوب في سؤالك

السلام عليكم ورحمة الله .. لتحديد مصدر البيانات على النموذج يمكنك اضافة الكود التالي عند الفتح onOpen if [condition] then me.RecordSource = Qry1 else me.RecordSource = Qry2 end if أو بصيغة أخرى تكتب فيها الاستعلام المطلوب مباشرة كالتالي if [condition] then me.RecordSource = "select * from Tbl1 where field1=1" else me.RecordSource = "Select * from tbl1 where field2 like 'Ali'" end if تحياتي

مرحبا أختي العزيزة أرجو ان تجربي تعديل الخصائص المتعلقة بالحقل في الجدول نفسه بالاضافة الى النموذج غيري الخصائص لتصبح كالتالي : field size : Double Format : General Number Decimal Places : 2 تحياتي

تحياتي ... جرب استخدام منسق الشعر على الرابط التالي لكتابة القصيدة http://www.iioem.org/modules.php?name=Poet

مثال لاختيار عدد من السجلات بالنقر عليها مرتين في نموذج ثم نسخها الى الذاكرة على شكل جدول يمكن لصقه في الوورد بالضغط على Ctrl+v او اختيار "تحرير ثم لصق" copyToWord.rar

السلام عليكم ورحمة الله اخواني الكرام .. اولا اشكركم جدا جدا على تشجيعكم وتواصلكم وثانياً فقد تمكنت اخييييييييراً والحمدلله من حل المشكلة كما هو مطلوب تماماً :( والطريقة هي كالتالي : - فتح وثيقة وورد جديدة - ادراج جدول به عمودين وعدد من الصفوف مساوٍ لعدد الحقول في الجدول - اضافة القيم للجدول - نسخ الجدول الى الذاكرة - اغلاق وثيقة الوورد ارجو ان تتاح لي فرصة لادراج المثال في المنتدى .. وجزاكم الله خيراً copyToWord.rar