title: Unload Statement does NOT Unload UserForm
body: <p>I'm sure this has a simple answer but it has me stumped. The following code is part of a user form I'm making in VBA. The form asks the user for the name of an item in one field, and the quantity of that item in another field. This code is part of what runs when the user clicks "okay" after entering that information. The If-Else Statement show below checks to see if the item (ItemName) appears on a sheet called Inventory. If it does not appear, then the user should see an error message, and the code should stop running. But, my code doesn't stop running. It seems to ignore that "Unload Me" line and keep right on going to the code after the If-Else Statement. What am I doing wrong here?</p>
  
  <pre><code>Private Sub cmdOkay_Click()
  
          Dim Quantity As Double
          Dim ItemName as String
          Dim FoundRange As Range
  
          ItemName = Item_Name_Field
          Quantity = Quantity_Field
  
          Sheets("Inventory").Select
          Range("A1").Select
  
          Set FoundRange = Cells.Find(What:=ItemName, After:=ActiveCell, LookIn:=xlFormulas, LookAt:=xlWhole, SearchOrder:=xlByColumns, SearchDirection:=xlNext, MatchCase:=False, SearchFormat:=False)
  
          If FoundRange Is Nothing Then
  
          Dim AlertBox As Double
          AlertBox = MsgBox(ItemName &amp; " was not found in Inventory. Check your spelling and try again.", vbExclamation, "Item Not Found")
          Unload Me
  
          Else
  
        '....
        '(more code)
  
         End If
        '(more code)
  End Sub
  </code></pre>