Dear Partho

Please try removing the custom menu in WindowDeactivate event..

If this post helps click Yes
--------------
Jacob Skaria

Private Sub Workbook_WindowDeactivate(ByVal Wn As Window)
'Close here
End Sub