Prova così:

codice:
a = Evaluate("Colori!G" & i)