اذهب الي المحتوي
أوفيسنا
بحث مخصص من جوجل فى أوفيسنا
Custom Search

الردود الموصى بها

قام بنشر

السلام عليكم

جدول لامتحانات الطلبة ويوجد بعض الخلايا فارغة

كيف بمكن جعل الخلية الفارغة بلون معتم (داكن) او نرسم عليها خط مائل؟

 

ف.jpg

قام بنشر (معدل)

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

اضغط على خانة تفصيل للتقرير او detail 

وفي حدث عند التنسيق   ضع هذا الكود 

ولو كان الاسم بالعربي "تفصيل " قم بتغييره إلى detail او قم بإبدال كلمة detail  ب تفصيل في الكود ..

Dim ctl As Control
 For Each ctl In Me.detail.Controls
 
        If ctl.ControlType = acTextBox Then
 
            If (IsNull(ctl) Or ctl = "") Then
                ctl.BackColor = &HFFC0C0 'light blue
            Else
                If ctl.ControlType = acTextBox Then ctl.BackColor = vbWhite
            End If
 
        End If
   Next

بالتوفيق ان شاء الله 

تم تعديل بواسطه سعيد صواب
قام بنشر
11 دقائق مضت, سعيد صواب said:

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

في خانة تفصيل للتقرير او detail 

ضع هذا الكود 

ولو كان الاسم بالعربي "تفصيل " قم بتغييره إلى detail او قم بإبدال كلمة detail  ب تفصيل في الكود ..


Dim ctl As Control
 For Each ctl In Me.detail.Controls
 
        If ctl.ControlType = acTextBox Then
 
            If (IsNull(ctl) Or ctl = "") Then
                ctl.BackColor = &HFFC0C0 'light blue
            Else
                If ctl.ControlType = acTextBox Then ctl.BackColor = vbWhite
            End If
 
        End If
   Next

بالتوفيق ان شاء الله 

الاخ العزيز

المشكلة لم تحل؟

قام بنشر (معدل)

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

لم يعمل الكود في مرفقك مع اني جربته في مثال لدي قبل ان ارفقه ..

 فأستخدمت التنسيق الشرطي

شاهد المرفق .

ولو لك سؤال حاضرين

لاحظ الشرط في التنسيق الشرطي : مبني في حالة لم يتحقق احد الشرطين ..

 

بالتوفيق

 

مثال.rar

تم تعديل بواسطه سعيد صواب
قام بنشر
5 ساعات مضت, سعيد صواب said:

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

لم يعمل الكود في مرفقك مع اني جربته في مثال لدي قبل ان ارفقه ..

 فأستخدمت التنسيق الشرطي

شاهد المرفق .

ولو لك سؤال حاضرين

لاحظ الشرط في التنسيق الشرطي : مبني في حالة لم يتحقق احد الشرطين ..

 

بالتوفيق

 

مثال.rar

السلام عليكم

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

  • Like 1

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

زائر
اضف رد علي هذا الموضوع....

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

  • تصفح هذا الموضوع مؤخراً   0 اعضاء متواجدين الان

    • لايوجد اعضاء مسجلون يتصفحون هذه الصفحه
×
×
  • اضف...

Important Information