Ahora he dejado la cosa asi:
 
Código:
 strSQL = "SELECT * FROM GAMES_GAMES"
SET MRC = ("ADODB.Recordset")
 MRC.Open strSQL, MyConn, 2,3
  MRC.AddNew
   MRC("ORDEN") = txtOrden
   MRC("ID_JUEGO") = txtIdJuego
   MRC("JUEGO") = txtGame
   MRC("LINK") = left(lcase(replace(txtGame, " ", "")), 3)
   MRC("CAT") = txtMaAn
  MRC.Update
 MRC.Close
  Pero me da error igualmente (Object required: '[string: "ADODB.Recordset"]' ) 
Si voy a estar muchotiempo asi... ¿Hay alguna otra forma de que añada los registros?