verketten per VBA

ActiveCell.FormulaR1C1 = _
"=RC[3]&RC[4]&RC[5]&RC[6]&RC[7]&RC[8]&RC[9]&RC[10]&RC[11]&RC[12]&RC[13]&RC[14]&RC[15]&RC[16]&RC[17]"

d.h. ich will alle Spalten von D bis R verkettet in Spalte A haben
liebe Grüße Petra