Copy Formula Down

[gregork]

I have the following user form code to add data to a worksheet:

Dim LastRow As Object

Set LastRow = Worksheets("Raw
Material").Range("b5000").End(xlUp)

LastRow.Offset(1, 0).Value = TextBox5.Text
LastRow.Offset(1, 2).Value = TextBox1.Text
LastRow.Offset(1, 5).Value = ComboBox2.Text

On the worksheet I have formulas in cells referring to the cells where I add
data. These formulas will have to be filled all the way down the worksheet
in anticipation of new entries. Instead of filling all these formulas down
the sheet, is it possible to add code to what I use when I add data that
will fill formulas down?

GK

 

[Tom Ogilvy]

LastRow.Offset(1,3).Resize(1,2).Filldown


assuming the last filled row has the formulas

 

[gregork]

Great, thanks Tom, that will tidy my sheet up.......I really didn't like
having formulas filled all the way down my columns.

cheers
GK

 

[gregork]

Tom I'm hoping you're following this thread as I was wondering if it is
possible to fill down the cell format as well as formula with code?

regards
GK

 

[Tom Ogilvy]

the code did fill down the format for me.