Concatenación con macro

Hola, normalmente introduzco la fórmula concatenar en una celda donde bebe de datos situados en otras celdas, pues bien, cuando arrastro hacia abajo o hacia la derecha la formula de concatenación bebe de los datos situados hacia abajo o hacia la derecha, porque no he fijado los datos.

Tengo que hacer esta formula con macro, pero en el código no tengo claro como decirle que tiene que beber siempre de los datos situados en cima de donde este la formula y así poder hacer una repetición para todas las columnas. Si esta formula "concatenar" está dentro de un "contar.si", se complica un poco más. Ejemplo:

Semana         1           2          3

Año             2012     2012    2012

Estado1

Estado2

Estado3

Tengo que contar cuantos "estados 1" perteneciente a la semana 1 hay en otra tabla de datos, que se llama T_Transacciones, donde los datos tienen esta forma: Estado2_2012_3 . Yo había puesto esto:

Range("a3").Select
Selection.End(xlToRight).Offset(0, 1).Select
ActiveCell.FormulaR1C1 = _
"=COUNTIF(T_Transacciones!C11,""*""&R7C2&""_""&Activecell.Offset(-2,0)&""_""&Activecell.Offset(-3,0))"

Pero no funciona. Podrian ayudarme por favor.

Muchas gracias.