Dynamic formula help

[ricklorion]

Hello,

I am trying to create a macro where formulas are dynamically inserted into cells. I get this error when I try to use this macro "Expected: end of statement".

I currently have:

intFormula = r + 6
Range("J" & intFormula).Select
    With Selection
        .formula = "=average(J8:J" & footer ")"
    End With

This is what I enter manually:
J21:

=AVERAGE(J8:J20)

J22:

=MIN(J8:J20)

J23:

=MAX(J8:J20)

J24:

=J23-J22

Please help.

 

[Weaver]

You're missing an "&"


.formula = "=average(J8:J" & footer & ")"
</pre>

 

[ricklorion]

Weaver, you're a life saver. Thank you.

 

[ricklorion]

I also have an issue with this statement:

Range.formula = "=J" & footer & "-J" & uniform

 

[Weaver]

What are the values of 'footer' and 'uniform'?

They'd have to be integers for this to work.