using the code below I want to retain the formatting of the first insert of text to the table while applying a new format to the next inserted table. How can I change the current selection to only the second insert? The Text:= is supposed to make the new insert the current selection. Any help would be greatly appreciated.

With objWord.Selection.Tables(1)
   .Rows(3).Cells(1).Range.Text = "PLAINTIFF/PETITIONER: "
   .Rows(3).Cells(1).Range.Select
End With

With objWord.Selection
   .Font.Name = "Verdana"
   .Font.Size = 8.5
End With

objWord.Selection.InsertAfter Text:="John Smith"
With objWord.Selection
   .Font.Name = "Courier"
   .Font.Size = 12
End With