Macro Excel - Repetição (loop)

Boa tarde,

estou com a seguinte dúvida,

estou fazendo uma macro e preciso que a macro altera algumas células conforme descrito embaixo:

	Range("A27").Select

	    ActiveCell.FormulaR1C1 = "=R[919]C[22]"

	    Range("A28").Select

	    ActiveCell.FormulaR1C1 = "=R[918]C[21]"

	    Range("K28").Select

	    ActiveCell.FormulaR1C1 = "=R[918]C[13]"

	--------> esse é um ciclo

	        Range("A39").Select

	    ActiveCell.FormulaR1C1 = "=R[908]C[22]"

	    Range("A40").Select

	    ActiveCell.FormulaR1C1 = "=R[907]C[21]"

	    Range("K40").Select

	    ActiveCell.FormulaR1C1 = "=R[907]C[13]"

	--------> esse é o segundo ciclo

	        Range("A51").Select

	    ActiveCell.FormulaR1C1 = "=R[897]C[22]"

	    Range("A52").Select

	    ActiveCell.FormulaR1C1 = "=R[896]C[21]"

	    Range("K52").Select

	    ActiveCell.FormulaR1C1 = "=R[896]C[13]"

	--------> ciclos seguintes (não sei se captaram oq eu queria passar, só que em vez de ficar fazendo varios ciclos queria fazer isso automaticamente com apenas algumas linhas.

	e assim por diante até completar 127 ciclos

	 

	oq acontece em cada ciclo, é o seguinte, se vocês perceberem em range sempre adiciona- se +12, e em activecell... em apenas R[..] se diminui -11, isso em cada ciclo.

	 

	Agradeço desde já,

	 

	Fernando Reus