The information in this article applies to:
SYMPTOMSWhen you click a Cancel button in a custom UserForm, the UserForm may not be dismissed as you expect. CAUSEThis behavior occurs because setting the Cancel property of a button to True does not actually cause the UserForm to be dismissed when you click the button. This behavior is by design of Microsoft Excel. RESOLUTIONMicrosoft provides programming examples for illustration only, without
warranty either expressed or implied, including, but not limited to, the
implied warranties of merchantability and/or fitness for a particular
purpose. This article assumes that you are familiar with the programming
language being demonstrated and the tools used to create and debug
procedures. Microsoft Support professionals can help explain the functionality
of a particular procedure, but they will not modify these examples to
provide added functionality or construct procedures to meet your specific
needs. If you have limited programming experience, you may want to contact
the Microsoft fee-based consulting line at (800) 936-5200. For more
information about the support options available from Microsoft, please see
the following page on the World Wide Web: http://www.microsoft.com/support/supportnet/overview/overview.asp In addition to setting the Cancel property of the button to True, you must also include the following line of code in the subroutine assigned to the Click event of the button:
For example, if your Cancel button is named "CancelButton", assign the following to the Click event for the button:
To view or edit subroutines attached to a specific button, double-click the button while editing the UserForm in the Visual Basic Editor. MORE INFORMATION
When you design custom UserForms in Microsoft Excel, you can set one
command button in the UserForm as a Cancel button. When the UserForm
is active, pressing ESC activates the Cancel button, just as if it
were clicked.
Additional query words: XL2000
Keywords : kbprg kbdta kbdtacode xlui KbVBA |
Last Reviewed: November 9, 1999 © 2000 Microsoft Corporation. All rights reserved. Terms of Use. |