Multicoloured continuous forms

[Samulayo]

Right to clear up that confusing title:

I use the bellow code in access 2000, but now require to use it in 97.

Private Sub Form_Current()
Dim ctl As Control
On Error Resume Next
For Each ctl In Forms!<Formname>.Form.Controls
With ctl
If .Tag = &quot;ConditionalFormat&quot; Then
With Forms!<Formname>.Form.Controls(ctl.Name).FormatConditions _
.Delete
End With

With Forms!<formname>.Form.Controls(ctl.Name).FormatConditions _
.Add(acExpression, , &quot;<field> = &quot; & True)
.BackColor = 14024661
.ForeColor = 0
End With
End If
End With
Next ctl
End Sub


*Thanks to Bill Power for this code btw*

If i run it in access 97 i get an error on acExpression
access cannot find the variable, so i assume a package needs to been included. Any idea what this package is? Where I can get it? and if I actually can get it for Access97?

Regards

Samulayo

 

[danvlas]

Access 97 does not support conditional formatting.
It is possible to simulate it in reports or in single forms. Not in continuous forms.




Daniel Vlas
Systems Consultant

http://www.geocities.com/danvlas/AutoMail.html

 

[Samulayo]

Damn it, I suspected as much. Thanks for the heads up before I told anyone about it.

Regards

Samulayo