اذهب الي المحتوي
أوفيسنا

تلوين اسطر التقرير المكون من عمودين


شامل2

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

 

السلام عليكم

هل توجد طريقة او كود معين لتلوين اسطر التقرير المكون من عمودين

بحيث يكون التلوين بين سطر واخر  ( مثلا : ابيض ثم رصاصي .. وهكذا لغرض التمييز بين الاسطر)

 

 
 

post-15769-0-77554300-1427215091_thumb.j

رابط هذا التعليق
شارك

Dim GrayLine As Boolean  ' ضع هذا السطر في راس المحرر

'..............................................

Private Sub تفصيل_Format(Cancel As Integer, FormatCount As Integer)
If GrayLine = True Then
    Me.تفصيل.BackColor = 14933454  ' رمادي
    GrayLine = False
Else
    Me.تفصيل.BackColor = 16777215  ' ابيض
    GrayLine = True
End If
End sub
  • Like 2
رابط هذا التعليق
شارك

باراك الله فيك استاذنا العزيز ابو خليل و جزاك خير الجزاء

 

اضافة الى ما تفضلت به مشكوراً اضع بعد اذنك كود آخر للفائدة بنفس الحدث ( عند التنسيق ) لقسم التفصيل للتقرير : 

Static intA As Integer


If intA Mod 2 = 0 Then
    Me.Detail.BackColor = 14933454
Else
    Me.Detail.BackColor = 16777215
End If
intA = intA + 1

بالتوفيق للجميع

  • 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