أبو أحمد

جزاكم الله خيرا ولكن بصراحة انا وجدت الكود الثاني أفضل أحيانا فاذا كان text به بيانات فيقوم بحذفها أو العكس If IsNull(Me.text1) Then Me.text2 = "" Else Me.text2 = 2 End If في حين مع الكود الاول لا يقوم بالحذف وهذه معلومة لحضرتك بعد تجربتها الان فقط وجزاكم الله خيرا وبارك فيكم

جزاكم الله خيرا ولكن لزيادة توضيح اذا اردت المعنى اذا كانtext1 تساوي صفر أو فارغ يكون text2 قيمته تساوي واحد والا فتكون قيمة text2 تساوي 2 لتكون هذه هي النتيجة : أيهما اكنب له If Me.text1.Value = "" Then Me.text2 = 1 Else Me.text2 = 2 End if أم أكتب له هذا If IsNull(Me. text1) then Me.text2 = 1 Else Me.text2 = 2 End if

جزاكم الله خيرا بالفعل وضح الفرق بينهما هل يمكنكم مساعدتي في توضيح السؤال الاول بطريقة مبسطة بارك الله فيكم

في انتظار حضرتك وجزاك الله خيرا

هل معنى ذلك أن معنى السؤال الاول هذا If Me.text1.Value = "" Then Me.text2.Value = "Adel" Else Me. text2.Value = "Ali" End if نفس النتيجة ونفس المعى لهذه ؟؟؟؟ If IsNull(Me.text) Then Me.text2.Value = "Adel" Else Me. text2.Value = "Ali" وأسف لاني لم أفهم اجابة السؤال الثاني أرجو التوضيح أكثر وحبا لو بمثال وجزاكم الله خيرا End if

الاساتذة الكرام أعضاء المنتدى / السلام عليكم ورحمة الله في اكسس 2003 ممكن أعرف أيه الفرق بين If IsNull(Me.text) then if me.text.value = "" then وبعد اذنكم سؤال آخر .... في مربع تحرير وسرد ما الفرق بين خاصية تحديث وخاصبة تغيير وجزاكم الله خيرا

جزاكم الله خيرا هذا هو المطلوب تسلم وبارك الله فيكم

للاسف الملف كبير جدا وصعب ارساله هل يمكنكم تعجيل الكود ؟؟؟

أخي الكريم / للاسف أعطى رسالة بضرورة تعبئة الحقل فقط وعند الضغط على موافق ينتقل الى السجل التالي بدون تعبئة الحقل اي انه اعطى اشارة فقط المطلوب أخي الكريم ان لا يتم الانتقال الى السجل التالي ولا الحفظ الا بادخال بيانات في هذا الحقل أسف أن كنت كلفت عليكم

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

السلام عليكم ورحمة الله الاخوة الكرام / كيف لي اجعل المستخدم لا يستطيع حفظ النموذج الا اذا ادخل بيانات في حقل معين بالنموذج (بمعنى اجبره علي ادخال بيانات في حقل معين) حتى يستطيع الضغط على زر حفظ النموذج ما هو الكود الذي يفعل ذلك ولكم جزيل الشكر علما انني اعمل على اكسس 2003

جزاكم الله خيرا ولكن هل يمكن تعديله مرة ثانية بعذ اذنكم لو سمحتم If IsNull([YourFeild]) Then Eval ("MsgBox('حقول بحاجة لتعبئة:" & vbCrLf & vbCrLf & _ "@@@', " & _ vbInformation + vbOKOnly & ", 'حقل مطلوب')") Me. ([YourFeild]).SetFocus Exit Sub Else End If

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

الاساتذة أعضاء المنتدى الكريم / السلام عليكم ورحمة الله عندي سؤال أتمنى أجد الاحابة عليه عندكم عندي قاعدة بيانات هل ممكن وضعها على جوجل دريف بحيث يقوم الاخرين بفتحها ومشاهدة البيانات الموجودة بها بدون أن يستطيع المستخدم من تحميلها أقصد للعرض البيانات فقط أو بمعنى آخر وضع القاعدة على النت للمشاهدة بياناتها والاستفادة من هذه البيانات دون ان يستطيع احد تحميلها على جهازه ... ما هي أفضل دريقة لذلك جزاكم الله خيرا

تمام جزاكم الله خيرا بالفعل يوجد اثنين اوفيس على الجهاز ثانيا قمت بالضغط على قائمة تعليمات ثم اختر كشف واصلاح بعد الانتهاء اغلقت الاكسس وفتحته من جديد كان تمام جزاكم الله خيرا

السلام عليكم الاساتذة أعضاء المنتدى الكرام عند فتح قاعدة البيانات تظهر لي رسالة ولم استطع فتح القاعدة علما بأنني كنت أقوم بفتحها على نفس الجهاز ولكن قمت بتغيير الويندوز (نفس النسخة) وكذلك الاوفيس فممكن اعرف سبب المشكلة وما هو الحل وجزاكم الله خيرا

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

أستاذي الكريم / جزاكم الله خيرا على الرد ولكن المطلوب هو دمج للخلايا وهي غير محددة الا أثناء حل المسألة ثانيا : هذا الدمج يختلف من مسألة لأخرى فلا يمكن تحديد الخلايا في الكود لانها غير ثابتة وتختلف من مسألة لأخرى أرجو أن تكون الفكرة وضحت وجزاكم الله خيرا

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

تمام جزاكم الله خيرا على هذه المعلومة

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

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

تمام أخي الكريم

اين المساعدة الاساتذة الكرام ؟ المطلوب تثبيت قيمة y1 وجعلها تساوي واحد (1) بدلا من ادخالها كل مرة في الكود السابق Between [forms]![frm1]![y1] And [forms]![frm1]![y2] وجزاكم الله خيرا

السلام عليكم تمام أستاذي الكريم ولكن لي تعديل بسيط Between [forms]![frm1]![y1] And [forms]![frm1]![y2] أريد جعل الرقم [y1] ثابت لأنه كل مرة سيبدأ من رقم 1 ولا نحتاج الإ الى ادخل الرقم الثاني فقط فلا حاجة لادخالها كل مرة فكيف نعدلها Between [forms]![frm1]![y1] And [forms]![frm1]![y2] بمعنى كمثال : جعلها بين 1 : 300 علما بأن العدد 300 هو الذي سيتم ادخاله كل مرة والرقم 1 ثابت