Why is this not working?

[snipered]

I am trying to say, when the user clicks on print preview close, then the whole application closes.

It keeps saying type mismatch

If objwddoc.CommandBars("Print Preview").Controls("Close").OnAction = True Then
     Set objwdrange = Nothing
    objwddoc.Close (wdDoNotSaveChanges)
    Set objwddoc = Nothing
    objwdapp.Quit
End If

[Bolerophone]

Please give some more details. It is very diffcilut to arrive at any conclusion from the question posted above.