I
Ian Manning
Hiya,
Wonder if anyone here could help me with a probelm I have getting a
calender control to pop up when a user clicks a cell. I have this
working in a test spreadsheet, but I can't get it to work as part of a
separate SS.
On the test spreadsheet I have used the following code in the worksheet
to pop up the active X control when the user clicks on cell B16:
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Address = "$B$16" Then
Call OpenCalendar
End If
End Sub
Where OpenCalender is a function defined in the same module that has the
routing:
Sub OpenCalendar()
frmCalender.Show
End Sub
My problem is that although I can get the control to pop up in a test
spreadsheet, once I add it to my main spreadsheet it doesn't work.
Running the OpenCalendar function via the macros menu works fine. It
just doesn't appear why when clicking cells.
Can anyone think of a reason why this wouldn't be working?
Many thanks if anyone can help me out.
Wonder if anyone here could help me with a probelm I have getting a
calender control to pop up when a user clicks a cell. I have this
working in a test spreadsheet, but I can't get it to work as part of a
separate SS.
On the test spreadsheet I have used the following code in the worksheet
to pop up the active X control when the user clicks on cell B16:
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Address = "$B$16" Then
Call OpenCalendar
End If
End Sub
Where OpenCalender is a function defined in the same module that has the
routing:
Sub OpenCalendar()
frmCalender.Show
End Sub
My problem is that although I can get the control to pop up in a test
spreadsheet, once I add it to my main spreadsheet it doesn't work.
Running the OpenCalendar function via the macros menu works fine. It
just doesn't appear why when clicking cells.
Can anyone think of a reason why this wouldn't be working?
Many thanks if anyone can help me out.