userform to close using the enter key

[still learning]

Hi

I have a userform that is used to enter a first name or a last name in textboxes
Then, when command button1 is clicked, the macro>>findd<< uses advance filter to find matches for either
If either name is not in the data, a message box comes up
How do I change, or add to, the macro so instead of clicking on the commonbutton, I can just hit enter

Private Sub CommandButton1_Click()
With TextBox5
 'last name
ActiveSheet.Range("p2").Value = .Text
End With
With TextBox1
 'first name
ActiveSheet.Range("q2").Value = .Text
End With
Me.Hide
findd
Unload Me
If Range("ae2").Value = "" Then
MsgBox (" NO Results")
End If
End Sub

ALSO, is it possible to have a message box the can close without hitting OK


mike

 

[still learning]

opps
I didn't get the rest of the question in before i hit post
way back in march, i posted a similar question and can't remember why it didn't work. I didn't have time then to explore this further and forgot about it. I'm now updating the spreadsheet
Excel Max was very nice in posting a reply (Mar 16 of this year)

 

[Logit]

Suggest you think of a different method. Assigning the ENTER key to do anything except enter data will lead to complete disaster.

 

[NoSparks]

How about just hitting the Enter key like normal after typing something into a textbox
and using the textbox Exit event to click the Command Button

Private Sub TextBox4_Exit(ByVal Cancel As MSForms.ReturnBoolean)
    CommandButton1_Click
End Sub

When your message box displays, the OK button is already selected, just hit the Enter key

 

[GWteB]

ALSO, is it possible to have a message box the can close without hitting OK

Would suggest not using a message box at all.
By adding a label to your userform to carry the message you have in mind, there's no need for hitting Enter or clicking an OK button.