Hi everybody.
I have been trying, unsucessfully, to create sort of a drop down calendar control.
Using events, such as worksheet_beforedoubleclick or worksheet_selectionchange, I have been able to make my object visible when selecting specific cells.
I have been trying to set the calendar position using properties like object.top and object.left, and setting them with the activecell properties, like activecell.top and (activecell.left + activecell.width)
Theoretically, it should be working right? But it's not. When I change the object position through VBA routines, it show two objects, one in the original position, and another one in the position I have determinated in the VBA routine. Also, only the object located in the original position works, the other one can't be clicked or anything else, like a locked object.
There must be something I have been doing wrong. I can't really upload this particular sheet, although, if needed, I can create a sample sheet for you guys.
Thanks in advance for your attention.
Hi bagulhodoido
I use the built in Calendar Control and use this code to place it on the sheet where I want itPrivate Sub UserForm_Activate() With frmCalendar .Top = 350 .Left = 80 End With End Sub
John
If you have issues with Code I've provided, I appreciate your feedback.
In the event Code provided resolves your issue, please click EDIT in your original post, click GO ADVANCED and set the PREFIX box to SOLVED.
If you're satisfied by any members response to your issue please use the star icon at the lower left of their post.
There are currently 1 users browsing this thread. (0 members and 1 guests)
Bookmarks