Va bene il suggerimento di Mems, ma scusa dov'è l'apertura del recordset, nel codice che hai postato non la vedo...
codice:
objRs.Open selSQL, objConn