Cita: objMail.Send ¿Debo quitar este de aqui o lo debo conservar aqui tambien?
Lo debes quitar, el error handler debe venir donde está la línea suceptible de error, es decir "En el evento error continúa en la siguiente línea" (On error resume Next)
On Error Resume Next
objMail.Send ' Aqui la linea suceptible de error
If err.number <> 0 Then 'continúa aquí, donde evalúa si el número de error no es cero y ejecuta
Salu2,