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

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

قام بنشر
 

السلام عليكم

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

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

 

 
 

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