FilterOn not working

[merry_fay]

Hi,

I've got this code on a combo box

Private Sub cmbSysName_Change()
Dim strFilter As String
If IsNull(Me!cmbSysName) Then
Else
strFilter = "'" & Me!cmbSysName & "'"
Form.Filter = strFilter
Form.FilterOn = True
End If

End Sub

It's running but not applying any filters at all. The combo box is in the header section of the form. Almost ready to lob the laptop out of the window!!
Any ideas why & what I need to do to sort it?

Thanks
merry_fay

 

[merry_fay]

OK, having a really blonde day........

Just needed to tell it which field needed filtering! Ooops, all sorted now thanks!!