Copy and Paste Formula in a Dynamic Worksheet

[chiswickbridge]

[TABLE="width: 500"]
<tbody>[TR]
[TD]Formula[/TD]
[TD]Date1[/TD]
[TD]String[/TD]
[TD]String[/TD]
[TD]String[/TD]
[/TR]
[TR]
[TD]=aaaaaaaa[/TD]
[TD]aaaaa[/TD]
[TD]aaaaa[/TD]
[TD]aaaaa[/TD]
[TD]aaaaa[/TD]
[/TR]
[TR]
[TD]=aaaaaaaa[/TD]
[TD]bbbbb[/TD]
[TD]bbbbb[/TD]
[TD]bbbbb[/TD]
[TD]bbbbb[/TD]
[/TR]
[TR]
[TD]=aaaaaaaa[/TD]
[TD]cccccc[/TD]
[TD]ccccc[/TD]
[TD]ccccc[/TD]
[TD]ccccc[/TD]
[/TR]
[TR]
[TD]=aaaaaaaa[/TD]
[TD]ddddd[/TD]
[TD]ddddd[/TD]
[TD]ddddd[/TD]
[TD]ddddd[/TD]
[/TR]
</tbody>[/TABLE]

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 ?