I am getting this error message at the FindFirst call in the following code.
Run-time error '3251':
Operation is not supported for this type of object.

Sub FillOneLCdetails(lcID As Long)
   
   Dim rstTSV As DAO.Recordset
   Dim strSQL As String
       
   Set rstTSV = CurrentDb.OpenRecordset("LaneChangeDetails")
   
   If rstTSV.EOF = False Then
       strSQL = "[ID] = " & lcID
       rstTSV.FindFirst strSQL
       If rstTSV.NoMatch Then
           MsgBox "No records found with " & strSQL
       End If
   '..... etc .....
   
   
MS DAO 3.6 Object Library is checked in Available References

Can someone tell me what's wrong?
(The strange thing is that the same code was working last year, I don't
understand...)

Thanks