ACCESS FEED: [MS_AccessPros] Re: Report with alternate rows shaded

Jumat, 28 Desember 2012

[MS_AccessPros] Re: Report with alternate rows shaded

Robin,
I have a report with the following code under the On Format setting and it works for me.

Private Sub Detail_Format(Cancel As Integer, FormatCount As Integer)
Const vbLightGrey = 12632256

If Me.CurrentRecord Mod 2 = 0 Then
Me.Section(acDetail).BackColor = vbLightGrey
Else
Me.Section(acDetail).BackColor = vbWhite
End If

End Sub

John F.

--- In MS_Access_Professionals@yahoogroups.com, Robin Chapple <robinski@...> wrote:
>
> Thanks Clive,
>
> I have made the changes that you suggested. The results have been loaded here:
> http://www.rotary9790.org.au/test/demo.asp
>
> What have I missed?
>
> Peace, Health and Happiness in 2013
>
> With Wishes for a fabulous New Year full of great achievements and experiences.
>
> Robin
>
> At 26/12/2012 10:51 PM, you wrote:
> >Hi Robin,
> >
> >Change the 'no color' to the colour that you want.
> >for pale grey try,
> >Alternate back color: #C0C0C0
> >
> >There may be named colors like RED, GREEN, etc. but
> >you can always find a colour by opening a Form in
> >DesignView and using the color selector.
> >
> >Hope that helps.
> >
> >Regards, Clive.
> >
> >--- In MS_Access_Professionals@yahoogroups.com, Robin Chapple
> ><robinski@> wrote:
> > >
> > > I am using Access 2010'
> > >
> > > I plan to have alternate rows of a report shaded to make reading easier.
> > >
> > > I have the detail properties:
> > > Back color: Alternate Row
> > > Alternate back color: No color.
> > >
> > > I have the fields property set to transparent.
> > >
> > > I have all lines shaded.
> > >
> > > What have I missed?
> > >
> > > Peace, Health and Happiness in 2013
> > >
> > > With Wishes for a fabulous New Year full of great achievements
> > and experiences.
> > >
> > > Robin Chapple