Проблем със close на word

Значи проблемчето е по скоро нерешимо ама аз се пак да си попитам.Правя си една програмка която като се отвори worda да го затвори и да напраи други чурки ама те не са важни.Destroywindow не му действа *незнайно защо* затоваизползвам една функциика от лорд референса:

Public Sub Timer1_Timer()

  On Error GoTo dida

  Set sad = GetObject(, "Word.Application")

  Tasks(Word.ActiveWindow.Caption & " - " & sad.Caption).Visible = False

  Tasks(Word.ActiveWindow.Caption & " - " & sad.Caption).Close

dida:

End Sub

обаче това действа само веднъж.Затваря го отварям го пак и неще.Некви идей щото аз немам.Благодаря предварително.

Споко оправих се по много по елементарен начин със постмесидже да ми се чеди човек що не го пробвах веднага

А бе пич аз в момента нямам нито Уорд, нито ВБ.
Но мисля, че имаше команда (метод) Quit.
Tа не съм сигурен дали нещо като
sad.Qiut
няма да ти свърши работа

Бии, за да те уважават!