Thread: Exit 2 Sub
View Single Post
  #1   Report Post  
Posted to microsoft.public.excel.programming
Doug Doug is offline
external usenet poster
 
Posts: 460
Default Exit 2 Sub

I have a button that calls for a proceedure. There is a message box to exit
the proceedure if condition is not met. How do I exit the balance of the
first proceedure so it doesn't continue to the end?

The code I have is:

Private Sub cmdEnterPledge_Click()
Call FillPledgeInfo
' more code '( this is where I want to end this sub so it doesn't
continue & save)
ActiveWorkbook.Save
End Sub

Private Sub FillPledgeInfo()
If txtBox1.Value = "" Then
MsgBox ("Donor Number Must be Entered Before Entering Pledge")
Exit Sub
End If
' more code
End Sub

I hope this is enough info so you can figure out what I'm trying to do.
Thanks for your help.
Doug