Ok, I think it has issues with Line 8 (the blank space between 'Dim
myNewField As String' and 'If Not Selection.Information(wdWithInTable)
Then'). I did also get a runtime error, #5941, with the same error message
once. As I am very new to VB any help with how best to debug would be
appreciated. (I just ran the script from the VB editor.)

The error only occurs when you select 'Yes' to add a new row. If you decline
there is no error message.

I also found that new row does not retain any of the field settings (i.e.
dropdowns) from the previous line, including the 'addrow' macro. It would
be best if the fields could be copied exactly into the new row, especially as
the user will not expect to have to go back 'up' to expand the table.

Thanks!