/* si todavia lo necesitas prueba con esto */
Option Explicit
Dim oWord As Object
'boton de comando
Private Sub cmdAbrirDWord_Click()
Set oWord = CreateObject("word.application")
oWord.Visible = True
oWord.Documents.Open ("C:\AYUDA.DOC")
End Sub
'al cerrar el form
Private Sub UserForm_QueryClose(Cancel As Integer, CloseMode As Integer)
oWord.Documents("AYUDA.DOC").Close
Set oWord = Nothing
End Sub
