title: access VBA error "operation not supported for this type of object"
body: <p>I have this vba code and I don't understand why it return error<br>
  me.ID is stored as string btw</p>
  
  <pre><code>Private Sub ID_AfterUpdate()
      Dim db As DAO.Database
      Dim rs As DAO.Recordset
  
      Me.ID = UCase(Me.ID)
        Set db = CurrentDb
      Set rs = db.OpenRecordset("Products")   
      rs.FindFirst ("[SKU] =""" &amp; Me.ID &amp; """") //this is the one giving error
      If Not rs.NoMatch Then
          MsgBox ("SKU Existed")
          Me.ID.Value = Null
          Me.Next.SetFocus //just for the sake of moving to this field then
          Me.ID.SetFocus  //to this field coz sometimes it won't go straight to
      End If
  
      rs.Close
      Set rs = Nothing
      Set db = Nothing End Sub
  </code></pre>
  
  <p><a href="https://i.stack.imgur.com/UqiCu.png" rel="nofollow noreferrer"><img src="https://i.stack.imgur.com/UqiCu.png" alt="any idea where I got this wrong ?"></a></p>