I'm trying to use the Date/Time ActiveX control in Excel 2000 and it is giving me problems. I am attempting to use this control contained directly on a worksheet (not contained on a separate form). My problem is that each time I start the workbook, the date/time control resizes itself to have an extremely large height. I set the control's height at 18 but upon loading it shows the height as about 5x that value. However, the properties of the control still show it listed with a height of 18? No matter what I do, I cannot seem to find a way to have the control maintain its initial height. I've tried this in several different workbooks, and it does the same everytime.
On the attachment i have a userform which pops up when cell B2 is selected. It is a month view from the additional controls on the control toolbox. I've also added a couple of text boxes with spin buttons.
A few amendments i want to make to it are:
User form pops up next cell B2
'Enter button' enters date and time into cell B2
Spin buttons increase/decrease hour field in incremnts of 1 and minutes field in increments of 5
How should i reformat the date and time picker? at this moments, it shows the date in the format of mm/dd/yyyy but the format that i want is dd/mm/yyyy.
I am trying to use the Date and Time Picker 6.0 and I have add it to the userform and named it DateofContact.
When I play the userform I get a error stating:
"Compile Error-Method or Data member not found"
Below I have added the code and it shows in red where the problem is.
Private Sub UserForm_Activate()
PSA.Text = Cells(lCurrentRow, 2).Value cboTypeofContact.Text = Cells(lCurrentRow, 3).Value DateofContact.Text = Cells(lCurrentRow, 4).Value TimeofContact.Text = Cells(lCurrentRow, 5).Value End Sub I am not sure what to put in its place.
I recently reformatted my hard drive and reinstalled my software. Now I don't seem to have the Date and Time Picker Control (among others) that I used to.
I did a thourough install of Microsoft Office 2000 Professional, and switched from Windows 98SE to Windows 2000 Professional. Isn't that control standard in such an installation? If its not, where can I get it?
i have just discovered the Microsoft date and time picker. at the moment i have a text box on my userform into which i put the date.can i use code to transfer the date to the text box or do i use the date picker instead of the textbox. if i used the date picker what is the code for the date picker
I have some excel tools developed in Excel 2003 which uses the date and time picker control (DtPicker). When I open my files in Excel 2007 the DtPicker is missing and the change_event will not load the calendar. I cannot find and activate the datepicker in the Reference base.
I'm trying to use the Date Time Picker control as a time picker and only want hours and minutes to show. Can this be done with its custom format property (Example)? The usual number formatting string doesn't seem to work.
I just installed Office 2013 Pro. In my Office 2010 Additional Controls toolbox, the control toolbox has a Date and Time Picker(DTPicker1) . I cannot find it in the Additional Controls toolbox in Excel 2013. I certainly hope they did not choose to not make it available in Excel 2013 - this is an extremely important control for my Excel spreadsheets as it allows inputting a date range on a userform with DTPicker1 and DTPicker2 and generating reports using VBA in conjunction with Autofiltering code on a Generate Report button.
I inserted the Date & Time picker Control into my worksheet. I have it linked to a cell. When I change the date, the new date goes into the cell, but it does not appear to be a "date" . The date formulas that use that cell do not evaluate properly. It looks different than when I type a date directly in to the cell (it is left justified). I tried formatting the cell as a date and the format property of the control is set to shortDate.
I want a drop down calender to choose date from and found that i can use More Controls> "microsoft Date and Time Picker 6.0 (SP4)" for excel 2007 but it doesn't work with other excel and shows a "x" not recognised in some other machines.
I am using the Microsoft Date and Time Picker Control 6.0 (SP4) from the more controls option on the developer Ribbon. The issue I have is when I protect the sheet I lose the functionality?
I have ranges selected as editable by user when the protect is on - this includes the linked cell to the date picker but it still doesn't work.
I have just added two date and time picker controls to my spread sheet to allow the user to select the date range.
They are linked to cells C9 & C10.
The problem is that the formula I using to check whether the first selection pre-dates the second has stopped calculating correctly when using the date and time pricker controls.
The formula is:
=IF(C9>C10,"Error","OK")
I have checked it on the same sheet by just typing the dates in and it works fine...I have tried formatting cells C9 & C10 to short date, general, text, number but it still does not calculate correctly.
I am trying to add a calendar picker to Excel 2010. Everything I read online says that it is possible, you just need to use the ActiveX control "Microsoft Date and Time Picker Control 6.0", and that it should be listed under Developer Tab -> Insert -> More Controls ->... But it's not listed.
I also tried downloading the Microsoft Windows Common Controls-2 6.0, but when I tried to add it to Excel using "Register Custom...", it says "Cannot register this control".
I have a table of data (total 142 rows). Column contains dates, in the format dd-mmm-yyyy.
I tried to filter using DATE FILTERS->EQUALS and in the custom filter window, I chose EQUALS then picked a date from the date picker icon. The date I picked was 5/4/2009 (this is May 4, 2009, formatted automaticall by excel as m/d/yyyy).
When I clicked OK, nothing showed up despite the fact that there are 6 occurences of May 4, 2009 (formatted as dd-mmm-yyyy in the data table)
So my questions are:
1. Is this due to the formatting?
2. Is there a way to change the date format supplied by the date picker?
I have 7 different time pickers on a userform. They work great...they are passing the time to the correct cells. The problem is that if I close the userform and then open it again, the time value goes back to 12:00:00 AM, leaving the proper time in the cell. I'm trying to change the value of the time picker to the value in the cell when I initialize the userform using the following:
If Range("IncidentTime").Value < "12:00:00 AM" Then dtpIncident_Time.Value = Range("IncidentTime").Value End If
When I run it, I get a Run-Time Error '35788, An error occurred in a call to the Windows Date and Time Picker control.
I have userform with date pickers and have text boxes overlaid on these, when I select todays date from the date picker it does not display the current date in the text box (I have 8 date pickers on the userform). If I select another date then reselect the current date it works. It has occasionally worked but why.
Below is the code for populating the text box from the Date Picker.
Private Sub DTPicker1_Change() TextBox1.Value = DTPicker1.Value End Sub
The initialize userform code uses the following to format and set the textbox
I'm trying to get a date picker to open with the current day's date, and am running into some trouble...
I added this line to the Initialize function:
Code: Private Sub UserForm_Initialize() DTPicker.Value = Date End Sub
...and this to a button which opens the form:
Code: Sub Open_frmPatientData() frmPatientData.Show frmPatientData.txtLastName.Value = "" frmPatientData.txtFirstName.Value = "" frmPatientData.txtID.Value = "" frmPatientData.txtDay.Value = DTPicker1.Day frmPatientData.txtMonth.Value = DTPicker1.Month frmPatientData.txtYear.Value = DTPicker1.Year End Sub
and I get a 'Run Time Error 424: Object Required' error on the line frmPatientData.show (in red). If I remove the line from the Initialize event, then everything works fine, but of course the current date isn't shown. What am I doing wrong?
I am using the below code to pick folder to get that name in text box. But when I click cancel in folder picker dialog box it disappears and again appears. Then again I have to click cancel. Am I using "If .Show = False Then Exit Sub" in correct way?
VB: Private Sub DirListText_DblClick(ByVal Cancel As MSForms.ReturnBoolean) Dim FolderPath As String With Application.FileDialog(msoFileDialogFolderPicker) .Show If .Show = False Then Exit Sub DirListText.Text = .SelectedItems(1) End With End Sub
I have a userform containing a date picker control. I am trying to get the date that is selected on to a woksheet called " Bank Holiday's" in cell O21.I have placed the following code in to a button used to close the form.
Private Sub CommandButton1_Click()
Sheets("Bank Holiday's").Select Range("O21").Select Range("O21") = UserForm17.DTPicker1.Value Unload Me End Sub
Is there an easy way to get a date picker on a cell, example i want a date picker in cell C4. I know there is a code you write to get this to work and create some kinda user form, but just wondering if there is an easier way.
I have userform In that Twotextbox Need to be Pickdate from Popupcalender..while placing cursor on Textbox1 and textbox2 it popup shows Pickupcalender.... I tried with different code still failed
Go to sheet Repor Wizard Form ,Click Report filter & Export cmd button
I'm building a userform excel application and am using the MS date/time picker control. I've run into the familiar "computer doesn't have OCX" problem and want to avoid using a custom OCX.
I was thinking of just making my own control instead. Has anyone made one in VBA? I found some VB examples which I could port over, but they use a lot of api calls. For reliability, I'd like to keep this as simple as possible though.
i built a form and in the date section i have a date picker and once i fill the form out i have a button that saves all the data on another sheet like a database, what do i need to do to make it were it adds the date to the database itll add all the other data but cant seem to figure out how to make the date display
I am new to VBA. Using Excel 2010. I have a date picker on a userform named LtPayCalFm1. I have created a named range on a sheet within the workbook called LQD which is a date. I want the date picker to show the date LQD when the form opens. The code I have is
Code:
Private Sub LtPayCalFm1_Initialize() Dim LQD As Range DTPicker1.Value = LQD End Sub
I get Run time error '380': Invalid property value How do I correct this?
