أبو أحمد

جزاكم الله خيرا 

ولكن بصراحة انا وجدت الكود الثاني أفضل أحيانا فاذا كان text  به بيانات فيقوم بحذفها  أو العكس 

جزاكم الله خيرا ولكن لزيادة توضيح 

اذا اردت المعنى اذا كان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

11 دقائق مضت, Ali Mohamed Ali said:

لا يمكن فتح أى ملف اكسيل يحتوى على

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

السلام عليكم ورحمة الله

الاساتذة الكرام .. أعضاء المنتدى الكريم 

قمت بعمل ملف بسيط يحتوي على عدد قليل جدا من الاكود (ثلاثة أو اربعة )

سؤال هل يمكن أن يفتح على الموبيل واعمل عليه ؟ وكيف ذلك 

وجزاكم الله خيرا 

السلام عليكم ورحمة الله

الاساتذة الكرام أعضاء المنتدى 

اريد كود  لانتقال الى الصفحة الثانية على حقل معين ؟

كذلك عند فتح الملف يفتح على خلية معينة ؟ وجزاكم الله خيرا 

منذ ساعه, محمد احمد لطفى said:

Me.ya = "1"

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

اين المساعدة الاساتذة الكرام ؟

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

وجزاكم الله خيرا 

14 ساعات مضت, kkhalifa1960 said:

تفضل أخي .

واذا كان هذا طلبك

السلام عليكم 

تمام أستاذي الكريم ولكن لي تعديل بسيط 

Between [forms]![frm1]![y1] And [forms]![frm1]![y2]

أريد جعل الرقم [y1] ثابت لأنه كل مرة سيبدأ من رقم 1 ولا نحتاج الإ الى ادخل الرقم الثاني فقط  فلا حاجة لادخالها كل مرة فكيف نعدلها 

Between [forms]![frm1]![y1] And [forms]![frm1]![y2]

بمعنى كمثال : جعلها بين 1 : 300 علما بأن العدد 300 هو الذي سيتم ادخاله كل مرة والرقم 1 ثابت