Open word userform from excel

[matapagi2019]

I want the button on userformTombol in document "Agendaku.docm" activate after The Excel application Quit.

What is the mistakes in the following code: ? (error message : Object dosn't support this property or method)

Private Sub CommandButton1_Click()Dim ObjWord As Object
Dim ObjDoc As Object
Dim ObjForm As Object
    Set ObjWord = GetObject(, "Word.Application")
    Set ObjDoc = ObjWord.Documents("D:\Agendaku.docm")
    ObjWord.Visible = True
    Set ObjForm = ObjWord.ObjDoc.UserFormTombol
        ObjForm.CommandButton1.Enabled = True
        ObjForm.CommandButton3.Enabled = False
ActiveWorkbook.Save
    'ActiveWorkbook.Close
    Windows.Application.Quit
End Sub

Thank you all !

 

[Macropod]

Cross-posted at: http://www.msofficeforums.com/word-vba/41883-open-word-userform-excel.html
Please read Mr Excel's policy on Cross-Posting in rule 13: http://www.mrexcel.com/forum/board-announcements/99490-forum-rules.html