Copy and Paste Formula in a Dynamic Worksheet

[chiswickbridge]

Formula	Date1	String	String	String
=aaaaaaaa	aaaaa	aaaaa	aaaaa	aaaaa
=aaaaaaaa	bbbbb	bbbbb	bbbbb	bbbbb
=aaaaaaaa	cccccc	ccccc	ccccc	ccccc
=aaaaaaaa	ddddd	ddddd	ddddd	ddddd

<tbody>
</tbody>

I have a Worksheet, starting from A1. First column contains a Formula, 2nd Column is a date and the other 3 as text.
The number of rows increases every day / week as data is fed in and reduces when the rows are deleted.

The number of rows is Dynamic but limited to 501 including the Header.

I need a macro to copy the last row ( constantly changing ), and paste till 501, including the formula of Col1 and excluding the data in other columns.

Thanks....

 

[Norie]

Why not convert to a table?

When you add data to a table any formulas are copied to the new rows.

 

[chiswickbridge]

How to do it ?