With Tbl If .Range.Characters.First.Previous.Paragraphs.Last.Range.Text Like "Table [3-4].*" & vbCr Then ... End If End With