بحث مخصص من جوجل فى أوفيسنا
Custom Search
|
-
Posts
774 -
تاريخ الانضمام
-
تاريخ اخر زياره
-
Days Won
5
نوع المحتوي
المنتدى
مكتبة الموقع
معرض الصور
المدونات
الوسائط المتعددة
مشاركات المكتوبه بواسطه Khalid Jnb
-
-
اخي العزيز بلال
انا اعمل على اوفيس 2010
اعتذر منك لغل احد الاخوة يفيدك بهذا الموضوع
تحياتي
-
- 1
-
السلام عليكم
اولا اخي الكريم عند تصميم قاعدة البيانت من الافضل ان تكون تسميات الحقول باللغة الانكليزية لتلافي الاخطاء البرمجية
ثانيا تفضل اخي الكريم حسب مافهمت من طلبك
لقد قمت بتغيير بعض اسماء الحقول للغة الانكليزية
ضع هذا الكود في حدث بعد التحديث لحقل بلد الميلاد
ممكن عملها بهذا الكود
If Me.text1 <> "الجزائر" Then Me.AA.Visible = False Me.EE.Visible = False Me.FF.Visible = False Me.a.Visible = False Me.e.Visible = False Me.f.Visible = False End If
او عملها بهذا الكود
If Me.text1 = "الجزائر" Then Me.AA.Visible = True Me.EE.Visible = True Me.FF.Visible = True Me.a.Visible = True Me.e.Visible = True Me.f.Visible = True Else Me.AA.Visible = False Me.EE.Visible = False Me.FF.Visible = False Me.a.Visible = False Me.e.Visible = False Me.f.Visible = False End If
تحياتي
-
السلام عليكم
من الافضل ارفاق قاعده البيانات او مثال عند طرح السؤال لتوفير الوقت على الجميع
المهم - حسب ما اعتقد يوجد تداخل بالاكواد عند الفتح
ضع العبارة التالية بداية الكود لتلافي الاخطاء
On Error Resume Next
تحياتي
-
السلام عليكم
اخي العزيز
ابحث بالموقع عن طريق زر البحث الموجود باعلى الصفحة من جهة اليسار ستجد الكثير من هذه البرامج
تحياتي
-
تفضل اخي الكريم
اتمنى يكون المطلوب
الملف الثاني هو الافضل بالاستعلام
تحياتي
- 1
-
السلام عليكم
اخي العزيز
اذا تمت الإجابه على السؤال فلا تنسى الضغط على ( أفضل إجابة )
تحياتي
-
السلام عليكم
اخي العزيز
اذا تمت الإجابه على السؤال فلا تنسى الضغط على ( أفضل إجابة )
تحياتي
-
-
السلام عليكم
اخي العزيز الرجاء ارفاق قاعده بيانات او مثال لغرض التعديل عند طرح السؤال لتوفير الوقت على الجميع
تحياتي
-
السلام عليكم
اخي العزيز حسب مافهمت من سؤالك
ممكن عمل ذلك بدالةIIF عن طريق حقل محسوب بالجدول او بالاستعلام
انظر للمرفق
اعلمنا النتائج
تحياتي
- 1
-
-
- 1
-
اخي العزيز @alix24028
ملاحظة مهمة جدا جدا
1- اذا كنت تريد ان تجعل حقل العمولة لكل عامل = صفر في حالة كان عدد العمال صفر / استخدم الكود التالي
=IIf([WRCOUNT]=0;0;[Commission]/[WRCOUNT])
2- اما اذا كنت تريد ان تجعل حقل العمولة لكل عامل هي نفس المبلغ حتى لو كان عدد العمل =صقر / استخدم الكود التالي
=IIf([WRCOUNT]=0;[Commission];[Commission]/[WRCOUNT])
اتمنى تكمون فهمتني اخي العزيز
تحياتي
- 2
-
اخي العزيز
انظر لما كتبت بالاعلى
وانظر للملف بعد التعديل
حسب علمي يمكن التخلص من المشكلة باستخدام دالة IIf
اتمنى ان يكون المطلوب واعلمنا النتائج
تحياتي
- 2
-
سؤال اخي العزيز
قبل ما افتح ملفك
هل انت عامل حقل تم فيه قيمة تمت القسمة على صفر
المهم
حسب علمي أن نقسم أي عدد على الصفر ( مثل ما أردت ) فهذا يعتبره الآكسس خطأ رياضي أو كما يسمى .. (Division by zero)
فهمت انك تريد تقسم العمولة على عدد العمال فيصبح الكود كالتالي
=IIf([WRCOUNT]=0;[Commission];[Commission]/[WRCOUNT])
اخبرنا النتائج
تحياتي
- 2
-
السلام عليكم
اخي العزيز
الرجاء ارفاق قاعده بيانات او مثال عند طرح السؤال لتوفير الوقت على الجميع
-
السلام عليكم
اخي العزيز
الرجاء ارفاق قاعده بيانات او مثال عند طرح السؤال لتوفير الوقت على الجميع
-
اخي العزيز
اذا كانت المشكلة لتقرير الطباعة ممكن حل مسالة التسلسل في التقرير ببساطة
بجعل قيمة الحقل =1 زمن خصائص الحقل - بيانات- اجعل المجموع التراكمي = شامل
ستجد ان التسلسل مضبوط حتى لو حذفت سجل
اما اذا كان عندك جدول غير مرتبط بعلاقة مع جدول اخر ممكن حل المسالة بجعل حقل التسلسل رقم واستخدام دالة dmax في القيمة الافتراضية للحقل من خلال النموذج المرتبط بالجدول او من خلال الاستعلام . انظر للفيديو من خلال الرابط
https://www.youtube.com/watch?v=z6aJXJWPAZg
اما اذا كان نريد ارجاع التسلسل كما كان قبل الحذف بصورة رسميىة انظر لرابط الفيديو ومن ثم قم بضعط واصلاح قاعدة البيانات.
https://www.youtube.com/watch?v=zV_ih0djTcw
تحياتي
- 1
-
السلام عليكم اخي الكريم
تفضل الشرح بالصور عن طريق التنيسق الشرطي (افتح النموذج في وضع التصميم ثم قم بتاشير الحقل ثم اضغط على التنسيق الشرطي)
وباقي الشرح بالصور
تم رفع الملف كامل بعد التعديل
تحياتي
- 3
- 1
-
السلام عليكم
تفضل اخي الكريم
اتمنى ان يكون المطلوب
ملاحظة لقد قمت بتغيير اسماء الحقول الاربعةالى (text1,text2,rext3,text4) لغرض سهولة الكتابة باللغة الانكليزية
-
السلام عليكم
يا اخي من الافضل ارفاق مثال لغرص التعديل افضل للجميع
1- بالنسبة لكود تحديث النموذج الذي يضع في زر عند النقر غي نفس النموذج الذي تعمل عليه.
2- بالنسبة لكود الحقل الفارغ ممكن وضعه عند فتح النموذج او قبل التحديث
3- بالنسبة لكود الرسالة يضع بعد تحديث النموذج
-
السلام عليكم
الافضل ان ترفق مثال عند طرح السؤال لتوفير الوقت على الجميع
* بالنسبة للالوان ممكن عمل ذلك عن طريق الكود او عن طريق التنسيق الشرطي
انظر للاكواد اتمنى تكون المطلوب
'تحديث بيانات النموذج me.Refresh Docmd.Requery '--------------------- 'تغير خلفية الحقل الى اللون الاحمر اذا كان فارغ If IsNull(Me.text1) Then Me.text1.BackColor = vbRed End If '----------------------------------------- 'يوضع في التنسيق الشرطي في التعبيير لتغيير اللون IsNull([text1]) '------------------------------------------- ' باكثر من شرط يوضع بالنموذج If Not IsNull(Me.[اسم الموظف]) And Not IsNull(Me.[الدرجة الوظيفية]) Then Beep MsgBox "مبروك كل الحقول مملوءة" End If
تحياتي
- 2
-
- 1
ارسال صورة او بي دي اف pdf الى رقم موبايل من قاعدة بيانات اكسس عبر واتس اب او تلكرام
في قسم الأكسيس Access
قام بنشر
السلام عليكم
انظر للرابط والمرفق لعله يفيدك في طلبك
تحياتي
https://www.youtube.com/watch?v=gUm_IDhH8Ak
ارسال ايميل عن طريقى الاكسس نصي او مرفق به تقرير (بدون اكواد).rar