[AccessD] Report Formating Problem

Mark A Matte markamatte at hotmail.com
Tue Jul 22 09:18:23 CDT 2008


Chester,

You need to add an 'ELSE' telling it to 'switch' back to black.
if somthing=true then
  RED
else
  BLACK
End if

I do the same thing except in the Detail_Print.

Hope it helps,

Mark A. Matte


> From: Chester_Kaup at kindermorgan.com
> To: accessd at databaseadvisors.com
> Date: Tue, 22 Jul 2008 09:04:28 -0500
> Subject: [AccessD] Report Formating Problem
>
> I have the following code in the on format event of the detail section of a report. It is setting the forecolor for all dates to red. I have walked through the code and it is skipping the records that do not meet the criteria. I have no conditional formatting set. The default foreground color is set to black. I have also tried the condition with NOW instead of DATE but no difference. What am I doing wrong here?
>
> Private Sub Detail_Format(Cancel As Integer, FormatCount As Integer)
> 'Stop
> If Last_IT_Date < Date - 10 Then
> Last_IT_Date.ForeColor = vbRed
> End If
> End Sub
>
>
> Chester Kaup
>
> Engineering Technician
>
> Kinder Morgan CO2 Company, LLP
>
> Office (432) 688-3797
>
> FAX (432) 688-3799
>
>
>
>
>
> No trees were killed in the sending of this message. However a large number of electrons were terribly inconvenienced.
>
> --
> AccessD mailing list
> AccessD at databaseadvisors.com
> http://databaseadvisors.com/mailman/listinfo/accessd
> Website: http://www.databaseadvisors.com

_________________________________________________________________
Keep your kids safer online with Windows Live Family Safety.
http://www.windowslive.com/family_safety/overview.html?ocid=TXT_TAGLM_WL_family_safety_072008



More information about the AccessD mailing list