I have a set of forms I want to change the backcolor of and the function I wrote is not finding the form within the collection. When I run the function (which is called in the formload and afterupdate of the involved controls) I get an error that says Access cannot find the form (strFormName) referred to. Stepping through the code shows the variable strFormName contains the correct form name. The collection just doesn't like it.

I'm obviously doing something wrong and can't figure it out. Can someone help please?

Thank you,

Loralee
+++++++++++++++++++++++++++++++++++++

Public Function UpdateBackcolor(strFormname As String, lngStatusid As Long)
'this function is called by frmPatient and frmReferral to update the backcolor
'based on patients status in PCG Program


    If lngStatusid = 3 Then
        Forms!strFormname.Detail.BackColor = conClosedColor
    Else
        Forms!strFormname.Detail.BackColor = conOpenColor
    End If


End Function

Access can't "find" a form unless it is open. Perhaps if you moved the code to another event?
Try the code on the On Current Event of the form that is open.

mmcdonal

On Current and On Activate both failed with the same message. Yet when I step through the correct form name is in strformname. I even tried changing it to a sub (as am not returning a value) and that didn't change it any. May take the function down to a form level one for each form if needed, but would prefer to be able to do it once globally.

How about this on the form's On Current Event:

If lngStatusid = 3 Then
        Me.Detail.BackColor = conClosedColor
    Else
        Me.Detail.BackColor = conOpenColor
    End If


mmcdonal