TabKey to CommandBox

[GColeman]

I'm sure its in one of these threads somewhere, but I couldn't find a working answer. Here's what I got...

Active cell is G8. User will enter a name and press "Tab". Target Cell is A10. But I want it to automatically select a commandBox (Cmnd1) or open a userform (PRForm1) instead of selecting A10. I've tried a couple ideas listed here, but they have me using selectionchange and creating a macro. And I'm not sure how to activate that macro either with "Tab" from G8, or with target address.

Private Sub Worksheet_SelectionChange(ByVal Target As Range)

If Target.Address = "($A$10)" Then
PRForm1.Show
End If

End Sub

 

[My Aswer Is This]

You can try something like this:
When the user double clicks on Range("G8") the UserForm named UserForm1 will show.

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
If Not Intersect(Target, Range("G8")) Is Nothing Then
Cancel = True
If Target.Cells.Count > 1 Then Exit Sub
UserForm1.Show
End If
End Sub