Public Sub Solution_Click() If AskOutKatie response = True Then FuckCharlotte = True DumpCharlotte = True Else if AskOutKatie response = False Then StickWithCharlotte = True. End If End Sub