the code I provided did fill down the formatting for me.

--
Regards,
Tom Ogilvy

"gregork" wrote in message
...
Tom I was wondering if it is
possible to fill down the cell format as well as formula with code?

regards
GK


"Tom Ogilvy" wrote in message
...
LastRow.Offset(1,3).Resize(1,2).Filldown


assuming the last filled row has the formulas

--
Regards,
Tom Ogilvy

"gregork" wrote in message
...
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