Hi Frosty. Your code works and eaclty as you explained. I added a table header row for consisteny accross pages. I only had to alter the staring row number of the code at
'now format the rows
For i = 1 To .Rows.Count
I changed to: For i = 2 To .Rows.Count.

As I use Word 2000 (or therebouts) as well as Word 2007 I feel your suggestion re splitting in to tables may not be consisted across all Work versions. However, once the delete duplicates is complete it may work to use your code to not add a line but to insert a continuous page break. at the row containing row with an Area name. I have found (outside your code) that this also splits the tables in a consistent way. I will experiment.

There is one aspect which I would like to understand if you are able to inform me.

1. The following items in the clear table borders sub contained objects not recognised in my Word 2007.
.Borders(wdBorderDiagonalDown).LineStyle = wdLineStyleNone
.Borders(wdBorderDiagonalUp).LineStyle = wdLineStyleNone

It was easy to comment these out for the code to run. However, I was not aware of 'diagonal borders'. If required by a user are these options that should be set to under Word 2007 options?

I am extremely grateful for your help on these issues and wish to also let you know that the explanation comments in your code make everything very easy to follow. Gratefully yours, Tony