Im trying to start a macro when someone double-clicks a certain range of cells. The compleet sub I got now is: 

```
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, cancel As Boolean)

If Not Application.Intersect(Target, Range("F5")) Is Nothing Then
cancel = True
Dim GoogleMapsCheckLink As String
GoogleMapsCheckLink = "https://www.google.nl/maps/place/" + Range("F5").Value + " " + Range("F6").Value + " " + Range("F7").Value
ActiveWorkbook.FollowHyperlink GoogleMapsCheckLink
GoogleMapsCheckYN.Show
End If

If Not Application.Intersect(Target, Range("B52, B61, D52, D61")) Is Nothing Then
    cancel = True
    macro

End If

End Sub

```

But whenever I select one of the cells e.g. B52, B61, D52 or D61 I get a compile error with the message:

> 
> Compile error:
> 
> 
> Wrong number of arguments or invalid property assignment
> 
> 
> 

The word Range is highlighted.

My question is of course what am I doing wrong currently?

**EDIT:**

After changing Range to

```
Range("B52, B61, D52, D61")

```

I get another error:

> 
> Run-time error '1004':
> 
> 
> Method ' Range' of object'\_Worksheet' failed
> 
> 
> 

Btw I also got other macros that are being activated through double clicking a certain cell value and those do work. The error only occurs when I got multiple cells as range...