Run VBA from double clicking a cell

[Danny54]

Is it possible to run a macro subroutine when double clicking on a cell contained in a worksheet?

what im thinking of is creating a subroutine that will filter data on a sheet and when the user double-clicks say "Cell A10" then macro would run
if they double-click "Cell A11" a different macro would run ect....

Thanks

 

[Fluff]

You can do that like

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
   If Not Intersect(Target, Range("A10:A12")) Is Nothing Then
      Select Case Target.Address(0, 0)
         Case "A10": Call Macro1
         Case "A11": Call Macro2
         Case "A12": Call Macro3
      End Select
   End If
End Sub

 

[JackDanIce]

Search for VBA Worksheet Event and then put this into the sheet object:

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
      
    With Target
       Select Case .Address
          Case "$A$10": Call Macro_1
          Case "$A$11": Call Macro_2
      End Select
   End With

   Cancel = True
End Sub

 

[jmacleary]

Hi Danny

The simple answer is yes. Use the worksheet double-click event.

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
Select Case Target.Address
Case "$A$10"
' call macro for A10 here
MsgBox "a10 clicked"
Case "$A$11"
' call macro for a11 here
MsgBox "a11 clicked"
Case Else

' any other cell double-clicked comes here and results in no action
Cancel = True
End Select
End Sub

Put this code in the worksheet macro area and amend as necessary. You can have as many case conditions as you like.

 

[Danny54]

Thanks all.

Man,
you guys are fast!

Have a Wonderful day

 

[Fluff]

Glad we could help & thanks for the feedback