Access - error en with

hola chicos!. tengo un problema al programar de acces a excel. el problema es el siguiente: accedo desde access a excel y hago una seleccion de un rango para darle formato, la primera vez que ejecuto el programa funciona bien, pero si lo vuelvo a ejecutar en un libro de excel nuevo me da un error en el with de la siguiente instruccion. El error que me dice es que el with no esta establecido.

'color
objexcel.ActiveSheet.Range("A2:A7").Select
With Selection.Interior
.ColorIndex = 40
.Pattern = xlSolid
End With

¿teneis alguna idea de xq puede ser?
GRACIAS