No lo tengo en mis manos pero te puedo decir como ok
mira primero tienes q hacer la referencia a word esto se hace en el menu proyecto/Referencias/ Microsoft Word Object Library 9.0 despues declarar una variable de tipo objeto word y otra de tipo word documento OK
despues solo direccionas a word con un nuevo objeto con la instruccion SET asi mismo el la variable documento OK
dim OjWord as word.application
dim docword as word document
Set OjWord = CreateObject("Word.Application")
Set docword = ApWord.Documents.Add ' con esto creas uno nuevo pero como lo q quieres es abrirlo esasi
Set docword = ApWord.Documents.open (ruta)
y para escribir solo mandas los textos pero tambien tienes q dar los saltos de linea
with ApWord.Selection
.ParagraphFormat.Alignment = wdAlignParagraphCenter '__Alinear al centro
.Font.Size = 20 '_Tamaño de la letra
.Font.Color = wdColorDarkBlue '_Color de la letra
.Font.Bold = True 'En false para desactivar negritas
.Font.Italic = True 'En false para desactivar cursiva
.Font.Underline = True 'En false para desactivar subrayado
.TypeText "Gustavo García" 'Texto siempre entre comillas
.TypeParagraph 'Salto de linea
.TypeParagraph 'Salto de linea
.Font.Bold = False 'En false para desactivar negritas
.Font.Italic = False 'En false para desactivar cursiva
.Font.Underline = False 'En false para desactivar subrayado
.Font.Color = wdColorGold 'Color de la letra
.ParagraphFormat.Alignment = wdAlignParagraphJustify '_Justificar
end with
apword.visible=true
Suerte
