![]() |
Action after Activate a cell
I am designing a template where for certain cells, an ActiveX Calendar
Control will appear if the cells are activated. I have designed the calendar form but don't know how to call the form when the cells are activated. Pls help or direct me to any available internet resource. regards |
Action after Activate a cell
You could use the Worksheet_SelectionChange() event, like so
Private Sub Worksheet_SelectionChange(ByVal Target As Range) If Not Application.Intersect(Target, Range("A1:A10")) Is Nothing Then UserForm1.Show End If End Sub This shows a UserForm called UserForm1 when any of the cells A1:A10 on the worksheet is selected. (It needs more refinement but will hopefully set you on your way) -- HTH Nick Hodge Microsoft MVP - Excel Southampton, England HIS "tang lk" wrote in message om... I am designing a template where for certain cells, an ActiveX Calendar Control will appear if the cells are activated. I have designed the calendar form but don't know how to call the form when the cells are activated. Pls help or direct me to any available internet resource. regards |
Action after Activate a cell
Thanks a lot.
Nick Hodge wrote: You could use the Worksheet_SelectionChange() event, like so Private Sub Worksheet_SelectionChange(ByVal Target As Range) If Not Application.Intersect(Target, Range("A1:A10")) Is Nothing Then UserForm1.Show End If End Sub This shows a UserForm called UserForm1 when any of the cells A1:A10 on the worksheet is selected. (It needs more refinement but will hopefully set you on your way) -- HTH Nick Hodge Microsoft MVP - Excel Southampton, England HIS "tang lk" wrote in message om... I am designing a template where for certain cells, an ActiveX Calendar Control will appear if the cells are activated. I have designed the calendar form but don't know how to call the form when the cells are activated. Pls help or direct me to any available internet resource. regards |
All times are GMT +1. The time now is 04:00 AM. |
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
ExcelBanter.com