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

تضليل الخلية الفارغة في التقرير


شامل2

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

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

اضغط على خانة تفصيل للتقرير او 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