Macro Filldown only with Formula

  • Thread starter Thread starter Guest
  • Start date Start date
G

Guest

Hi,

A new at the macro programming and am trying to produce a macro that
fillsdown formula on my spreadsheet but keeps the formatting. This is the
code that I have currently but it does not keep the format of the cells.

ActiveSheet.Range("V7").Select
ActiveCell.FormulaR1C1 = "=SUM(RC[-20]:RC[-2])"
ActiveSheet.Range("V7:V10").Select
Selection.FillDown
ActiveSheet.Range("V31").Select
ActiveCell.FormulaR1C1 = "=SUM(RC[-20]:RC[-2])"
ActiveSheet.Range("V31:V39").Select
Selection.FillDown

Any help would be greatly appreciated.

Thanks,

Ben
 
Range("V7:V10,V31:V39").FormulaR1C1 = "=SUM(RC[-20]:RC[-2])"

alone should do what you want.
 
Back
Top