Multiple cells to open one userform

[crburke92]

Still relatively new to coding. I'm trying to build an equipment schedule so I know where gear is going/has been. I'm trying to set it up so I can double click the piece of equipment which will in turn run a user form. It works for my first line (A3), but not for anything after.

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
 
If Target.Address <> "$A$3" Then Exit Sub
UserForm1.Show
If Target.Address <> "$A$4" Then Exit Sub
UserForm1.Show

Not sure if there's also a way to use a "For Each Cell In Range("X:X") sort of function to cut down on lines as well. Any help is appreciated!

 

[Fluff]

Hi & welcome to MrExcel.
Maybe something like

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
   If Not Intersect(Target, Range("A3:A20")) Is Nothing Then
      Cancel = True
      UserForm1.Show
   End If
End Sub

 

[crburke92]

That did the trick, thanks Fluff!

 

[Fluff]

You're welcome & thanks for the feedback