如何关闭在进程中的WINWORD.EXE?小弟的代码如下,总是不能关闭进程中的WINWORD

Question

Private Sub cmdWord_Click()
    With wdApp
    .Visible = False
    .Documents.Add App.Path & "\test.doc", False
    .Selection.GoTo wdGoToBook, , , "aaaaaaa"
    .Selection.TypeText "bbbbbb"
    .Application.ActiveDocument.SaveAs (App.Path & "\Report\test2.doc")
    .ActiveDocument.Close
    End With
    Set wdApp = Nothing
End Sub

Answer 1

少了关闭Word的语句：
Private Sub cmdWord_Click()
    With wdApp
    .Visible = False
    .Documents.Add App.Path & "\test.doc", False
    .Selection.GoTo wdGoToBook, , , "aaaaaaa"
    .Selection.TypeText "bbbbbb"
    .Application.ActiveDocument.SaveAs (App.Path & "\Report\test2.doc")
    .ActiveDocument.Close
    End With
    wdApp.Quit  '<------------------------加上这句就OK
    Set wdApp = Nothing
End Sub

Answer 2

wdApp.Quit  
恭喜樓上的答對了.