clloyd1226
03-10-2008, 11:20 AM
I am trying to add a paragraph after a MSWord table and am unable to exit the table (the text gets added in the table). I am a VBA newbie so it could be something obvious.
Dim oRng As Word.Range
Dim oPara As Word.Paragraph
ActiveDocument.Tables.Add Range:=Selection.Range, NumRows:=1, NumColumns:= _
2
ChangeFileOpenDirectory _
"C:\Documents and Settings\chris lloyd\My Documents\My Pictures\"
Selection.InlineShapes.AddPicture FileName:= _
"C:\Documents and Settings\XXXXXXXX\My Documents\My Pictures\XXXXXX.JPG" _
, LinkToFile:=False, SaveWithDocument:=True
Selection.MoveRight Unit:=wdCell
Selection.TypeText Text:="XXXXXXX"
Selection.TypeText Text:="XXXXXXXX"
?????? What code goes here to start a new paragraph after the table?
Dim oRng As Word.Range
Dim oPara As Word.Paragraph
ActiveDocument.Tables.Add Range:=Selection.Range, NumRows:=1, NumColumns:= _
2
ChangeFileOpenDirectory _
"C:\Documents and Settings\chris lloyd\My Documents\My Pictures\"
Selection.InlineShapes.AddPicture FileName:= _
"C:\Documents and Settings\XXXXXXXX\My Documents\My Pictures\XXXXXX.JPG" _
, LinkToFile:=False, SaveWithDocument:=True
Selection.MoveRight Unit:=wdCell
Selection.TypeText Text:="XXXXXXX"
Selection.TypeText Text:="XXXXXXXX"
?????? What code goes here to start a new paragraph after the table?