[Tom]

I found a different way of getting around this problem. I applied used
a style switch using a table style in Word and it worked great. Here's
the code:

Sub ConvertNotesFlush()

Dim oTbl As Table
For Each oTbl In ActiveDocument.Tables
If oTbl.Cell(1, 1).Range.Style = _
ActiveDocument.Styles("R-notetable-flush") Then
With oTbl

.Style = ActiveDocument.Styles("notetable-flush")

End With
End If
Next oTbl
End Sub

"R-notetable-flush" is the style in RoboHelp and "notetable-flush" is
the table style.