LinkBack Thread Tools Search this Thread Display Modes
Prev Previous Post   Next Post Next
  #1   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 63
Default Userform SetFocus with Exit and Cancel

Dear All,

I have a userform with a couple of textboxes and an OK and Cancel button at
the bottom of the form. After consulting this news group, I found the Exit
event (I was using the AfterUpdate event before, but wanted the setfocus to
be in a certain textbox.) For validation purposes, I have set up the Exit
event as you can see in the following:

Private Sub SymbolBox_Exit(ByVal cancel As MSForms.ReturnBoolean)
'
Dim RngFound As Range, SymbolRange As Range 'SellRange as Range
Dim SellSymbol As String ' LstRow As Integer
If SymbolBox.Value = "ABC" Then
If Not IsNumeric(SymbolBox.Value) Then
SymbolBox.Value = UCase(SymbolBox.Value)
SellBox.SetFocus
Else
MsgBox "Need to type in a valid symbol"
cancel = True
SymbolBox.Text = ""
SymbolBox.SetFocus
End If
Else
MsgBox "Need to enter a symbol"
cancel = True
SymbolBox.Text = ""
SymbolBox.SetFocus
'Exit Sub
End If

End Sub

The problem is if the user does not enter any data, but wants to exit the
form and clicks on the Cancel button, nothing happens. The userform does not
close. How can I get the userform to close? Thanks in advance.

Neal
 
Thread Tools Search this Thread
Search this Thread:

Advanced Search
Display Modes

Posting Rules

Smilies are On
[IMG] code is On
HTML code is Off
Trackbacks are On
Pingbacks are On
Refbacks are On


Similar Threads
Thread Thread Starter Forum Replies Last Post
How to get userform Cancel button to invoke Exit Sub in calling macro? Craig Remillard New Users to Excel 1 November 19th 09 03:55 AM
Cancel/Exit Sub Howard Excel Discussion (Misc queries) 3 December 16th 08 09:53 PM
InputBox / VBA question ok = print, cancel = exit todd78 Excel Worksheet Functions 4 August 9th 07 04:42 PM
Cancel an application exit from VBA? helmekki[_98_] Excel Programming 3 October 28th 05 03:31 AM
Cancel Exit on duplicate Garry Jones Excel Programming 2 November 3rd 03 11:21 PM


All times are GMT +1. The time now is 02:19 AM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
Copyright ©2004-2025 ExcelBanter.
The comments are property of their posters.
 

About Us

"It's about Microsoft Excel"