Problems with shading in a report

[aussie_user]

HI,

I am creating a report that when it is presented to the committee needs to have projects that were on the last report and haven't changed shaded.

From searching the report forum I was able to figure out how to do it from a previous post.

This is the code I came up with

Private Sub Detail_Print(Cancel As Integer, PrintCount As Integer)
If Shade = Yes Then

Me.ProjectName.BackColor = 12632256
Me.Type.BackColor = 12632256
Me.OrgName.BackColor = 12632256
Me.GrantAmount.BackColor = 12632256
Me.Shade.BackColor = 12632256
Me.WhatsNext.BackColor = 12632256
Else

Me.ProjectName.BackColor = 16777215
Me.Type.BackColor = 16777215
Me.OrgName.BackColor = 16777215
Me.GrantAmount.BackColor = 16777215
Me.Shade.BackColor = 16777215
Me.WhatsNext.BackColor = 16777215
End If
End Sub

The shading works on the 3 of the fields (ProjectName, Type & GrantAmount). The OrgName field does not shade and the WhatsNext field causes a compile error (method or data member not found)

I've retyped the names several times, I even cut and pasted the names from the property box of the problem fields but nothing seems to help.

Does anyone have any suggestions of what I may be doing wrong or what else I can try.

Thanks

 

[aussie_user]

found the problem

Don't know why, but I deleted both fields, then re-added them to the document and all the shading works fine now. Don't understand why. Just thought I'd leave this post here incase someone else has a similar problem.