View Single Post
  #2   Report Post  
Posted to microsoft.public.excel.programming
Dave Peterson Dave Peterson is offline
external usenet poster
 
Posts: 35,218
Default Referring to BeforeDoubleClick

You could create a public variable in a General module -- not behind the
worksheet and not in the userform's code.

Public myOption as long 'or boolean

Then change that value to whatever you need in the code for the userform.

Then you can check that variable's value in your event code:

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, _
Cancel As Boolean)
If Target.Cells.Count 1 Then Exit Sub

Cancel = True 'stop editing in cell

if myoption = 1 then
'do the stuff for option 1
else
'do the stuff for option 2
end if

End Sub

art wrote:

Hello All:

I have a VBA Code Using the BeforeDoubleClick.
My Question is how do I refer to that Sub?

I want to make that if the user selects from a userform option 1 then
BeforeDoubleClick should one way, if user selects option 2 then
BeforeDoubleClick should work differently. Is there a way to do this? How Can
I do this? Below are the BeforeDoubleClick code and the userform code that I
want to use.

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, _
Cancel As Boolean)
If Target.Cells.Count 1 Then Exit Sub

Cancel = True 'stop editing in cell
If IsNumeric(Target.Value) Then
Target.Value = Target.Value + 1
End If
End Sub

Private Sub OKButton_Click()
On Error Resume Next
If optionRightAdd Then
Run Macro50
End If
If OptionLeftAdd Then
Run Macro51
End If
Unload UserForm1
End Sub

Thanks in Advance.


--

Dave Peterson