Cannot quit Mircrosoft office Excel.

[Pravynandas]

Hi,

This is my first post in Mr.Excel (Though i'm reading here from past a year).

I've designed an excel application in which a userform will be active all the time showing on the desktop (somehow i managed to hide the excel application on the tastbar)

Now when I try to Logoff / Shutdown I'm getting a pop-up "Cannot quit Mircrosoft office Excel." followed by a "End Program" dialog with message "The system cannot end this program because it is waiting for a response from you."

However when I close the Active userform by pressing Cancel/X button it closed fine.

The Code is:

Private Sub UserForm_QueryClose(Cancel As Integer, CloseMode As Integer)

Vresp = MsgBox("Are you sure to exit the userform?", vbYesNo)
If Vresp = vbYes Then
If Application.Workbooks.count > 1 Then
ThisWorkbook.Close
Else
ActiveWorkbook.Save
Application.Quit
End If
Else
Cancel = True
End If

End Sub

Conclusion: Can't Logoff/Shutdown without the need of closing userform manually?