Sim.
Você pode usar algo assim:
.Range(Range("E27"),Range("E27").End(xlDown))
Outras leituras: link
Além disso, você não precisa usar FillDown
, pode fazer tudo em uma linha:
.Range(Range("E27"),Range("E27").End(xlDown)).Formula = strFormulas