No lo entiendo...¿dónde está el error?

Wenas!

Estoy tratando de hacer una plantilla en excell donde he puesto 3
botones (corresponden a información de 3 años diferentes) de tal modo
que al pulsar cada uno de ellos se vuelque información de otras hojas en
celdas de esa misma plantilla.

El código en cuestión:

Range("D8").Select
Selection.ClearContents
ActiveCell.FormulaR1C1 = "=VLOOKUP(R[-5]C[2],'E:\EMPR\LISTADOS\5024\FY
07\[SEM0636.xls]ID_5024_03'!C6:C12,7,0)"

Range("E8").Select
ActiveCell.FormulaR1C1 = "=VLOOKUP(R[-5]C[1],'E:\EMPR\LISTADOS\5024\FY
07\[SEM0636.xls]ID_5024_03'!C6:C12,2,0)"

Range("G8").Select
ActiveCell.FormulaR1C1 = "=VLOOKUP(R[-5]C[-1],'E:\EMPR\LISTADOS\5024\FY
07\[SEM0636.xls]ID_5024_03'!C6:C21,16,0)"


Cuando pulso el botón me muestra los datos de las dos primeras celdas
(d8 y e8) pero me da error en la última (g8). La fórmula he comprobado
que es correcta, ¿alguna sugerencia?.

Muchas gracias.

Mk