L
Leif
In the format detail event of a report I'm doing some special formatting to
highlight certain lines based on date ranges. The formatting works fine in
Access reports. If I export to snap format it also works fine. However, if
I try to export to HTML then the all the lines become highlighted. Is there
some bug with the html export from Access reports? Is there a work around?
My code is below:
Actually I guess I got confused between my forms and reports. In the report
I do use the report format to set the color, not CF, however, I still have
the problem in HTML. My coding looks like the following:
Private Sub Detail_Format(Cancel As Integer, FormatCount As Integer)
If NextTestLatest < Date And Not (Not IsNull(Extension) And Extension >=
Date) Then
txtName.ForeColor = 255
txtName.FontWeight = 900 'Bold
txtName.FontItalic = True
NextTestLatest.ForeColor = 255
NextTestLatest.FontWeight = 700
NextTestLatest.FontItalic = True
Else
txtName.ForeColor = 0
txtName.FontWeight = 400 'Normal
txtName.FontItalic = False
NextTestLatest.ForeColor = 0
NextTestLatest.FontWeight = 400
NextTestLatest.FontItalic = False
End If
End Sub
highlight certain lines based on date ranges. The formatting works fine in
Access reports. If I export to snap format it also works fine. However, if
I try to export to HTML then the all the lines become highlighted. Is there
some bug with the html export from Access reports? Is there a work around?
My code is below:
Actually I guess I got confused between my forms and reports. In the report
I do use the report format to set the color, not CF, however, I still have
the problem in HTML. My coding looks like the following:
Private Sub Detail_Format(Cancel As Integer, FormatCount As Integer)
If NextTestLatest < Date And Not (Not IsNull(Extension) And Extension >=
Date) Then
txtName.ForeColor = 255
txtName.FontWeight = 900 'Bold
txtName.FontItalic = True
NextTestLatest.ForeColor = 255
NextTestLatest.FontWeight = 700
NextTestLatest.FontItalic = True
Else
txtName.ForeColor = 0
txtName.FontWeight = 400 'Normal
txtName.FontItalic = False
NextTestLatest.ForeColor = 0
NextTestLatest.FontWeight = 400
NextTestLatest.FontItalic = False
End If
End Sub