Help with "Doubleclick event"
 

Hi all, as a dabbler and not a programmer i have been experimenting with
trying to double click on a cell which is a named range and have it take me
to another worksheet but only if the cell value is more than 0.
It must take me to another sub were i will have a filter code to show the
parts relevant to that field.

Any help would be greatly appreciated.
--
Les

Help with "Doubleclick event"
 

Hi,
In the code module of the sheet, use the sub BeforeDoubleClick to capture
that event; something like:
'----------------------------------------------------------------------------
Private Sub Worksheet_BeforeDoubleClick( _
ByVal Target As Range, Cancel As Boolean)
Dim oldEnableEvents as boolean

'''prevent other event to fire while processing
oldEnableEvents= application.enabledEvents
application.enabledEvents=false

'''' YOU CODE OR CALL HERE

'''reset EnableEvents
application.enabledEvents=oldEnableEvents

''' prevent user-edit of the cell
Cancel = True
End Sub
'----------------------------------------------------------------------------
--
Regards,
Sébastien
<http://www.ondemandanalysis.com


"Les" wrote:

Hi all, as a dabbler and not a programmer i have been experimenting with
trying to double click on a cell which is a named range and have it take me
to another worksheet but only if the cell value is more than 0.
It must take me to another sub were i will have a filter code to show the
parts relevant to that field.

Any help would be greatly appreciated.
--
Les

Help with "Doubleclick event"
 

and by the way, the section of your code would test the cell for values
greater than 0:
'''' YOU CODE OR CALL HERE
If Val(Target.cells(1))0 then
''' <code
end if
--
Regards,
Sébastien
<http://www.ondemandanalysis.com


"sebastienm" wrote:

Hi,
In the code module of the sheet, use the sub BeforeDoubleClick to capture
that event; something like:
'----------------------------------------------------------------------------
Private Sub Worksheet_BeforeDoubleClick( _
ByVal Target As Range, Cancel As Boolean)
Dim oldEnableEvents as boolean

'''prevent other event to fire while processing
oldEnableEvents= application.enabledEvents
application.enabledEvents=false

'''' YOU CODE OR CALL HERE

'''reset EnableEvents
application.enabledEvents=oldEnableEvents

''' prevent user-edit of the cell
Cancel = True
End Sub
'----------------------------------------------------------------------------
--
Regards,
Sébastien
<http://www.ondemandanalysis.com


"Les" wrote:

Hi all, as a dabbler and not a programmer i have been experimenting with
trying to double click on a cell which is a named range and have it take me
to another worksheet but only if the cell value is more than 0.
It must take me to another sub were i will have a filter code to show the
parts relevant to that field.

Any help would be greatly appreciated.
--
Les