Hi
The following example adds text to the text frame of shape one in the active publication, and then formats the new text. This example assumes there is at least one shape on the first page of the active publication.
Sub AddTextToTextFrame()
With ActiveDocument.Pages(1).Shapes(1).TextFrame.TextRange
.Text = "My Text"
With .Font
.Bold = msoTrue
.Size = 25
.Name = "Arial"
End With
End With
End Sub
OR for the default add-ins text frame look here
http://msdn.microsoft.com/en-us/library/aa140136(v=office.10).aspx