seclat.blogg.se - Microsoft date and time picker control excel 2016 download

#Microsoft date and time picker control excel 2016 download code#
#Microsoft date and time picker control excel 2016 download windows#

Date and Time picker control is missing from my Excel/Microsoft office 16 - Windows 10/64bite. 29, " dhDaysInMonth2 = DateSerial(Year(dtmDate), _ " 25, " ' Did the caller pass in a date? If not, use" 23, " ' Return the number of days in the specified month. 22, "Function dhDaysInMonth2(Optional dtmDate As Date = 0) As Integer" SmallTextArray = Array("day1", "day2", "da圓", "day4", "day5", "day6", "day7")įor i = LBound(smallDayArray) To UBound(smallDayArray) Properties("Caption") = "Select Date Range" ' You can add several commonly used references by running the "setGUIDReferences()" subroutine above.ĭim myForm As Object, calendarForm As Object, newLabel As MSForms.Label, newSpinner As MSForms.SpinButtonĭim NewButton As MSForms.CommandButton, newButton2 As MSForms.CommandButton

' Note: MSForms Reference in Tools menu must be added to workbook first before this calendar script will work ' Bug Fixed: Aug 2020, Selecting Original Date was resulting in 12:00:00 AM ' This creates dategetter userform for those without access to date picker ' "", 0, 0 ' Microsoft MSXML2 for XML Scraping ' included below are several other common references you can use for other projects just uncomment them to add

' Or go to Tools -> References and select the MSForms reference there ' You can add the MSForms reference by running this sub first ' NOTE: The dateGetter() sub will not work until the MSForms Reference is added to this workbook project Public absDate As Date ' This Public Variable is necessary to pass selected date You must do this before attempting to run the dateGetter macro. I've added another subroutine that can add that reference through VBA code, or in the VBA Editor goto "Tools -> References" and select the MSForms refwerence. If it works for you, give me a shout out.įixed a glitch - when selecting the original date that opened with the form the returning date was "00:00:00 AM" - I fixed that below to return the date showing in the label2 caption.Īlso - MSForms reference is necessary for the dateGetter() subroutine to work properly or you get an error message when the forms objects are declared. It should be compatible with most systems, though I haven't tested it on others than my own.

#Microsoft date and time picker control excel 2016 download code#

I developed code that will create a dateGetter userform, get the user's date selection as a Global variable, and then delete the form. Some users may not have the ability to use your DatePicker if their Excel is not formatted correctly. In either way, you will need to implement the actions when you click on these controls.

Default size of the controls on UserForm:.

Now the controls are in your Controls tab to add on UserForms.

Scroll down and tick Microsoft Date and Time Picker Control 6.0 (SP6) or Microsoft MonthView Control 6.0 (SP6):.

In the Toolbox for the UserForm selected, right click on empty space of the Controls tab, click Additional Controls.

When you are out of Design Mode, clicking on the DTPicker control is like this, while the MonthView takes more space:.

Scroll down and select Microsoft Date and Time Picker Control 6.0 (SP6) or Microsoft MonthView Control 6.0 (SP6) then click OK.

In Developer tab, Controls group, click Insert, then bottom right.Date and Time Picker ( DTPicker), left/top of screenshots.Once you have registered the mscomct2.ocx control ( YOU WILL NEED TO REGISTER THIS FILE ON ALL COMPUTERS THAT WILL USE THIS WORKBOOK!), you can either add one of below controls in the Worksheet or in a UserForm: