Greg,

Thanks for the suggestion - part way there. It seems to sort all the cells
in the second column as one long list. I need to alpha-sort the entries
within each cell.

Is that an easy adjustment (writing macro code I'm afraid is not something
I've accomplished with any success).




"Greg" wrote in message
oups.com...
Robin,

Try:
Sub ScratchMacro()
Dim oTbl As Table
For Each oTbl In ActiveDocument.Tables
oTbl.Columns(2).Sort ExcludeHeader:=True
Next
End Sub