Hi,
a matter of logic rather than programming.
As I am no good at fields and related topics
of document automation, I'd try it this way.
Case 1
Insert one or more empty rows in table x.
Insert the text you like.
Leave the cell for the numbering empty.
Check wich cells in column 1 are empty
Get e.g. Selection.Information(wdEndOfRangeRowNumber)
You know then, where a row was inserted
e.g. rows 7 9 and 12 are new rows
Insert new rows in table y after line 6,
after line, 8 and after line 11.
Transfer the text
Renumber both tables (column 1).
Case 2:
One or more rows deleted:
Then there are numbers missing.
If the numbering starts with 3,
then rows 1 and 2 where deleted
If there are breaks in numbering,
then the "gap" rows where deleted.
If there are no gaps, but the number of rows
in table x is smaller then in table y, then
there were rows deleted from the end of
table x ...
Delete then rows with the numbers so achieved
in table y...
Greetings from Bavaria, Germany
Helmut Weber, MVP
"red.sys" & chr(64) & "t-online.de"
Word 2002, Windows 2000
Graeme Prentice - 28 Jun 2005 10:02 GMT
I think I didn't explain what I needed very well, but thanks for taking
the trouble to reply.
Graeme
> Hi,
>
[quoted text clipped - 33 lines]
> "red.sys" & chr(64) & "t-online.de"
> Word 2002, Windows 2000