texto color determinado

Tengo el siguiente código que hace lo siguiente: Comprueba si en una tabla hay algun registro con cierto valor en cierto campo. Si encuentra algun valor, pongo de determinado color unas cajas de texto. Todo esto, lo hace en el evento timer, ...

Hola: Estoy intentando diferenciar mediante dar color a la celda de destino, de que hoja está cogiendo el dato. Las sentencias que estoy utilizando son con variable, no enunciada, del tipo: 'AnPr AnPr = Sheets("Datos ...