Absolute Bezüge?

eine frage: warum liefert das folgende makro immer absolute bezüge?? und wie kann ich es erreichen, dass aus den absoluten relative bezüge werden???

Sub rctest()
Dim a As Integer
Dim b As Integer
Dim c As Integer
a = 6
b = 5
c = 2
Do Until a = 100
Cells(a, 1).Select
ActiveCell.FormulaR1C1 = "=dada" & "!R" & (b) & "C" & (c)
a = a + 2
b = b + 1
Loop
End Sub

danke im voraus,

andreas