Sub ScratchMacro()
'A basic Word macro coded by Greg Maxey
Selection.Tables(1).Cell(x,y).Range.Text = "This is your text"
End Sub