كيفية زيادة شروط التنسيق الشرطى فى أكسيس 2007

اخي الفاضل

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

امكانيات نسخة الأكسيس 2003 و 2007 في التنسيق الشرطي هي 3 شروط فقط ولا تستطيع زيادة ذلك

ولهذا اذا رغبنا في زيادة الشروط فإننا نستغني عن التنسيق الشرطي ونقوم بعمل ذلك بواسطة الكود البرمجي بهذه الطريقة

Private Sub Form_Current()
Select Case Me.ID
Case Is = 1
Me.ID.BackColor = RGB(255, 0, 255)
Me.sName.BackColor = RGB(255, 0, 255)

Case Is = 2
Me.ID.BackColor = RGB(160, 0, 255)
Me.sName.BackColor = RGB(160, 0, 255)

Case Is = 3
Me.ID.BackColor = RGB(0, 0, 255)
Me.sName.BackColor = RGB(0, 0, 255)

Case Is = 4
Me.ID.BackColor = RGB(0, 121, 0)
Me.sName.BackColor = RGB(0, 121, 0)

Case Is = 5
Me.ID.BackColor = RGB(155, 0, 0)
Me.sName.BackColor = RGB(155, 0, 0)

Case Is = 6
Me.ID.BackColor = RGB(27, 216, 149)
Me.sName.BackColor = RGB(27, 216, 149)

Case Is = 7
Me.ID.BackColor = RGB(255, 0, 0)
Me.sName.BackColor = RGB(255, 0, 0)

Case Is = 8
Me.ID.BackColor = RGB(255, 216, 249)
Me.sName.BackColor = RGB(255, 216, 249)

Case Is = 9
Me.ID.BackColor = RGB(165, 126, 129)
Me.sName.BackColor = RGB(165, 126, 129)

Case Is = 10
Me.ID.BackColor = RGB(201, 219, 110)
Me.sName.BackColor = RGB(201, 219, 110)

Case Is = 11
Me.ID.BackColor = RGB(84, 91, 85)
Me.sName.BackColor = RGB(84, 91, 85)

Case Is = 12
Me.ID.BackColor = RGB(35, 152, 175)
Me.sName.BackColor = RGB(35, 152, 175)

Case Is = 13
Me.ID.BackColor = RGB(41, 98, 186)
Me.sName.BackColor = RGB(41, 98, 186)

Case Is = 14
Me.ID.BackColor = RGB(5, 3, 103)
Me.sName.BackColor = RGB(5, 3, 103)

Case Is = 15
Me.ID.BackColor = RGB(71, 41, 3)
Me.sName.BackColor = RGB(71, 41, 3)

Case Is = 16
Me.ID.BackColor = RGB(35, 37, 3)
Me.sName.BackColor = RGB(35, 37, 3)

Case Is = 17
Me.ID.BackColor = RGB(75, 93, 178)
Me.sName.BackColor = RGB(75, 93, 178)

Case Is = 18
Me.ID.BackColor = RGB(44, 253, 52)
Me.sName.BackColor = RGB(44, 253, 52)

Case Is = 19
Me.ID.BackColor = RGB(20, 0, 255)
Me.sName.BackColor = RGB(20, 0, 255)

Case Is = 20
Me.ID.BackColor = RGB(180, 10, 55)
Me.sName.BackColor = RGB(180, 10, 55)

End Select

End Sub

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

لا تنسانا من التقييم بارك الله بك

za-ConditionalFormatting.rar

بالتوفيق

منكم نستفيد

فعلا اخت فاضله ذو خبره فائقه

ربنا يعطكي علي قدر نيتك

بسم الله الرحمن الرحيم

الموضوع وما فية هو الأـى حتى يتضح السؤال أسف انى لم أذكر ذلك من البداية

لدى جدول رئيسى بنى علية أستعلام وبنى على الأستعلام نموذج

الأن نحن فى النموذج وظاهر امامنا كافة سجلات الجدول الرئيسى من خلال النموذج الفرعى

هناك عمود فارغ من كافة البيانات يقوم المستخدم بكتابة رقم فى هذا لنموذج

اذا ادخل المستخدم رقم 1 فى هذا الحقل من السجل الأول وبمجرد خروجة يتلون هذا الحقل باللون الأخضر واذا ضغط رقم 2 يتلون الحقل باللون الأصفر

اذا انتقل للسجل التالى وأدخل الرقم 3 يتلون الحقل باللون الأحمر مع المحافظة على السجل السابق بنفس لونة المقابل للرقم

1 = أخضر

2 = أصفر

3 = أحمر

4 = أزرق

5 = رصاصى

مرفق مثال وعلية التوضح

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

za-ConditionalFormatting.rar

للرفع

تفضل اخي الكريم

لا تنسانا من التقييم بارك الله بك

za-ConditionalFormatting-UP.rar

بالتوفيق

طبعا امتياز امتياز

لكن كيف لم أجد اى كود على أى حدث

كيف تم هذا

طبعا معروف حضرتك ان المثال المرفق ليس العمل الأصلى ولكنة مثال لتقريب المطلوب

سأتعلم الطريقة انفذها على عملى الأصلى ولكم منا كل الشكر والأحترام

منتظر شرح حضرتك

وشكرا

rewnasser كتب:

طبعا امتياز امتياز

لكن كيف لم أجد اى كود على أى حدث

كيف تم هذا

طبعا معروف حضرتك ان المثال المرفق ليس العمل الأصلى ولكنة مثال لتقريب المطلوب

سأتعلم الطريقة انفذها على عملى الأصلى ولكم منا كل الشكر والأحترام

منتظر شرح حضرتك

وشكرا

لم يتم استخدام اي كود في النموذج ولا تنسيق شرطي

تم اضافة جدول جديد TblStatus يوجد به كود اللون وايضا خمس صور وهي اللون الأخضر واللون الأصفر واللون الأحمر واللون الأزرق واللون الرصاصي

لو قمت بالضغط دبل كليك على حقل صورة اللون سيظهر لك اللون المختار حسب طلبك وحسب الرقم المقابل

الآن نربط هذا الجدول بالجدول الأساسي الخاص بنا بحقل رقم الكود

بحيث اذا اخترنا رقم الكود المطلوب تظهر الصورة الخاصة بهذا الكود

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

بالتوفيق

اعتقد انى فهمت خدعة حضرتك

صورة فى جدول مربوط بجدولى الرئيسى كل لون بصورة ملونة بلونة واستعلام من الجدولين فى نموذج فرعى من النوع النماذج المستمرة

يظهر 4 حقول منهم حقل الصورة حقل الصورة يوضع فوق حقل كود اللون بعد تغير خصائص حقل كود اللون الى اللون الشفاف فقط

الله ينور عليكى -

الحاجة التى لم اتوصل اليها هى كيفية تغير لون خط حقل كود اللون بنفس لون الصورة

عظيمة بعقلك اختنا الكريمة

مشاركتك صبق مشاركتى صدقينى ارسلت مشاركتى قبل ان ارى مشاركتك

مشكورة اختنا

rewnasser كتب:

اعتقد انى فهمت خدعة حضرتك

صورة فى جدول مربوط بجدولى الرئيسى كل لون بصورة ملونة بلونة واستعلام من الجدولين فى نموذج فرعى من النوع النماذج المستمرة

يظهر 4 حقول منهم حقل الصورة حقل الصورة يوضع فوق حقل كود اللون بعد تغير خصائص حقل كود اللون الى اللون الشفاف فقط

الله ينور عليكى -

الحاجة التى لم اتوصل اليها هى كيفية تغير لون خط حقل كود اللون بنفس لون الصورة

عظيمة بعقلك اختنا الكريمة

مشاركتك صبق مشاركتى صدقينى ارسلت مشاركتى قبل ان ارى مشاركتك

مشكورة اختنا

بارك الله بك اخي الكريم

يمكن تشكيل برنامج الأكسيس حسب رغبتنا اذا لم تتوفر به الشروط اللازمة لتنفيذ فكرتنا بحيث تؤدي الغرض منها وبدون اي مشاكل

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

بالتوفيق

مشكورة اختى الكريمة

بارك الله بكى وزادنا علما بعلمك

مشكورة مرة اخرى

شكر  ممكن تحويل ملف الاخت زهره الى 2003

ashraf2011 كتب:

شكر  ممكن تحويل ملف الاخت زهره الى 2003

تفضل اخي الكريم

نسخة المثال على اكسيس 2003

za-ConditionalFormatting-2003.rar

بالتوفيق