Ok, I've added the DAO 3.6 library and tried the following code again:
Private Sub cbWeek_AfterUpdate()
Dim var As Variant
var = DLookup("[id]", "Activity_Log", "[StudyID] = " & Me.cbStudyID.Value & " AND [Week] = " & Me.cbWeek.Value)
Dim rs As DAO.Recordset
Set rs = Me.RecordsetClone
rs.FindFirst "[id] = " + var
End Sub
... but now I keep getting a type mismatch error on the line "Set rs = Me.RecordsetClone"
|