Help with code On Open event.

[topgun64]

I am having problems with the code below. I have this set on the OnOpen event of the form. But it is not working.
I know it is probally something easy I am just not seeing it...

Private Sub Form_Open(Cancel As Integer)
If Payee = "HR Electric" And Date = "JAN" Or "FEB" Then
Feb1.BackColor = vbGreen
Else
Feb1.BackColor = vbWhite
End If

End Sub

 

[bubba100]

Does-- If Payee = "HR Electric" work?

 

[topgun64]

Thanks for the reply.

No it does not. When I try to open the form I get a type mismatch error message

 

[bubba100]

I believe you need to use me.feb1.Backcolor= also try using the number code for the color

 

[topgun64]

The problem is within this line. If I take out the highlighted area it works.

If Payee = "HR Electric" And Date = "JAN" [blue]Or "FEB"[/blue] Then

 

[Remou]

How about:

If Payee = "HR Electric" And (Date = "JAN" Or Date="FEB") Then

 

[topgun64]

Excellent! it worked... thank you so much

 

[JoeAtWork]

I suggest you don't use "Date" as a variable, as it is a reserved word.