Yes, you need the Workbook level equivalent. This needs to be in the ThisWorkbook module:
Code:
Private Sub Workbook_SheetBeforeDoubleClick(ByVal Sh As Object, ByVal Target As Range, Cancel As Boolean)
If Not Intersect(Target, Sh.Range("A3:A25")) Is Nothing Then
'code
'code
'code
End If
End Sub