How do I access a Date picker on a Multipage?
I want to assign it a value.
I have tried

frmTMF.MultiPage1.Pages.Item(DTPickerReviewDate).Value = Date
and
frmTMF.DTPickerReviewDate.Value = Date

both return error 438 - Object doesn't support this property or method

Sorry needed to correct first post

How do I access a Date picker on a Multipage?
I want to assign it a value.
I have tried

frmTMF.MultiPage1.DTPickerReviewDate.Value = Date
and
frmTMF.DTPickerReviewDate.Value = Date

first returns error 438 - Object doesn't support this property or method
second returns error 35788 - An error occured in a call to the windows date
and time picker control

This worked for me:

Me.DTPicker1.Year = Year(Date)
Me.DTPicker1.Month = Month(Date)
Me.DTPicker1.Day = Day(Date)

HTH,

Eric

"Shawn" wrote:

> Sorry needed to correct first post
>
> How do I access a Date picker on a Multipage?
> I want to assign it a value.
> I have tried
>
> frmTMF.MultiPage1.DTPickerReviewDate.Value = Date
> and
> frmTMF.DTPickerReviewDate.Value = Date
>
> first returns error 438 - Object doesn't support this property or method
> second returns error 35788 - An error occured in a call to the windows date
> and time picker control

If the page is activated
Me.DTPicker1.Value = Date

If not try on change event...
Private Sub MultiPage1_Change()
If MultiPage1.SelectedItem.Caption = "Page2" Then
Me.MultiPage1.Pages(1).DTPicker1.Value = Date
End If
End Sub

If this post helps click Yes
---------------
Jacob Skaria


"Shawn" wrote:

> Sorry needed to correct first post
>
> How do I access a Date picker on a Multipage?
> I want to assign it a value.
> I have tried
>
> frmTMF.MultiPage1.DTPickerReviewDate.Value = Date
> and
> frmTMF.DTPickerReviewDate.Value = Date
>
> first returns error 438 - Object doesn't support this property or method
> second returns error 35788 - An error occured in a call to the windows date
> and time picker control

Hi Shawn,

Pls also see my post dd. 07.07.09 subjectatePicker control lost in 2007,
if it is relevant.

Rgds
Lemi

"Shawn" <(E-Mail Removed)> wrote in message
news:8606D9CC-7170-4F80-B11C-(E-Mail Removed)...
> Sorry needed to correct first post
>
> How do I access a Date picker on a Multipage?
> I want to assign it a value.
> I have tried
>
> frmTMF.MultiPage1.DTPickerReviewDate.Value = Date
> and
> frmTMF.DTPickerReviewDate.Value = Date
>
> first returns error 438 - Object doesn't support this property or method
> second returns error 35788 - An error occured in a call to the windows
> date
> and time picker control

This does not work on a multipage on a userform - sorry if I was not clear on
that.
A userform with a multipage that has a date picker in it.

"EricG" wrote:

> This worked for me:
>
> Me.DTPicker1.Year = Year(Date)
> Me.DTPicker1.Month = Month(Date)
> Me.DTPicker1.Day = Day(Date)
>
> HTH,
>
> Eric
>
> "Shawn" wrote:
>
> > Sorry needed to correct first post
> >
> > How do I access a Date picker on a Multipage?
> > I want to assign it a value.
> > I have tried
> >
> > frmTMF.MultiPage1.DTPickerReviewDate.Value = Date
> > and
> > frmTMF.DTPickerReviewDate.Value = Date
> >
> > first returns error 438 - Object doesn't support this property or method
> > second returns error 35788 - An error occured in a call to the windows date
> > and time picker control

If this repliy appears more than once I apologize - the reply button is
having issues

Me.DTPicker1.Value = Date
does not work with a multipage

Me.MultiPage1.Pages(1).DTPicker1.Value = Date
returns error 438 - Object doesn't support this property or method




"Jacob Skaria" wrote:

> If the page is activated
> Me.DTPicker1.Value = Date
>
> If not try on change event...
> Private Sub MultiPage1_Change()
> If MultiPage1.SelectedItem.Caption = "Page2" Then
> Me.MultiPage1.Pages(1).DTPicker1.Value = Date
> End If
> End Sub
>
> If this post helps click Yes
> ---------------
> Jacob Skaria
>
>
> "Shawn" wrote:
>
> > Sorry needed to correct first post
> >
> > How do I access a Date picker on a Multipage?
> > I want to assign it a value.
> > I have tried
> >
> > frmTMF.MultiPage1.DTPickerReviewDate.Value = Date
> > and
> > frmTMF.DTPickerReviewDate.Value = Date
> >
> > first returns error 438 - Object doesn't support this property or method
> > second returns error 35788 - An error occured in a call to the windows date
> > and time picker control

Please read the comments along with the code...

If the page/control is *** activated *** and visible on screen
Me.DTPicker1.Value = Date

'If not try on ***change event ****...
Private Sub MultiPage1_Change()
If MultiPage1.SelectedItem.Caption = "Page1" Then
Me.DTPicker1.Value = Date + 5
End If
End Sub

If this post helps click Yes
---------------
Jacob Skaria


"Shawn" wrote:

> If this repliy appears more than once I apologize - the reply button is
> having issues
>
> Me.DTPicker1.Value = Date
> does not work with a multipage
>
> Me.MultiPage1.Pages(1).DTPicker1.Value = Date
> returns error 438 - Object doesn't support this property or method
>
>
>
>
> "Jacob Skaria" wrote:
>
> > If the page is activated
> > Me.DTPicker1.Value = Date
> >
> > If not try on change event...
> > Private Sub MultiPage1_Change()
> > If MultiPage1.SelectedItem.Caption = "Page2" Then
> > Me.MultiPage1.Pages(1).DTPicker1.Value = Date
> > End If
> > End Sub
> >
> > If this post helps click Yes
> > ---------------
> > Jacob Skaria
> >
> >
> > "Shawn" wrote:
> >
> > > Sorry needed to correct first post
> > >
> > > How do I access a Date picker on a Multipage?
> > > I want to assign it a value.
> > > I have tried
> > >
> > > frmTMF.MultiPage1.DTPickerReviewDate.Value = Date
> > > and
> > > frmTMF.DTPickerReviewDate.Value = Date
> > >
> > > first returns error 438 - Object doesn't support this property or method
> > > second returns error 35788 - An error occured in a call to the windows date
> > > and time picker control

Actually, I placed the DTP on the second page of a multi-page control on a
user form, and the code I supplied you worked perfectly. Not sure why yours
won't work, but mine did.

It also works this way:

Me.MultiPage1.Pages("Page2").DTPicker1.Year = 2009
Me.MultiPage1.Pages("Page2").DTPicker1.Month = 7
Me.MultiPage1.Pages("Page2").DTPicker1.Day = 1



Eric

"Shawn" wrote:

> This does not work on a multipage on a userform - sorry if I was not clear on
> that.
> A userform with a multipage that has a date picker in it.
>
> "EricG" wrote:
>
> > This worked for me:
> >
> > Me.DTPicker1.Year = Year(Date)
> > Me.DTPicker1.Month = Month(Date)
> > Me.DTPicker1.Day = Day(Date)
> >
> > HTH,
> >
> > Eric
> >
> > "Shawn" wrote:
> >
> > > Sorry needed to correct first post
> > >
> > > How do I access a Date picker on a Multipage?
> > > I want to assign it a value.
> > > I have tried
> > >
> > > frmTMF.MultiPage1.DTPickerReviewDate.Value = Date
> > > and
> > > frmTMF.DTPickerReviewDate.Value = Date
> > >
> > > first returns error 438 - Object doesn't support this property or method
> > > second returns error 35788 - An error occured in a call to the windows date
> > > and time picker control

Select Page1 and then try running your code. It appears the page the control
is on must be active in order to address the control's properties.

--
Rick (MVP - Excel)


"EricG" <(E-Mail Removed)> wrote in message
news:430BC669-44A1-4AA8-AD8D-(E-Mail Removed)...
> Actually, I placed the DTP on the second page of a multi-page control on a
> user form, and the code I supplied you worked perfectly. Not sure why
> yours
> won't work, but mine did.
>
> It also works this way:
>
> Me.MultiPage1.Pages("Page2").DTPicker1.Year = 2009
> Me.MultiPage1.Pages("Page2").DTPicker1.Month = 7
> Me.MultiPage1.Pages("Page2").DTPicker1.Day = 1
>
>
>
> Eric
>
> "Shawn" wrote:
>
>> This does not work on a multipage on a userform - sorry if I was not
>> clear on
>> that.
>> A userform with a multipage that has a date picker in it.
>>
>> "EricG" wrote:
>>
>> > This worked for me:
>> >
>> > Me.DTPicker1.Year = Year(Date)
>> > Me.DTPicker1.Month = Month(Date)
>> > Me.DTPicker1.Day = Day(Date)
>> >
>> > HTH,
>> >
>> > Eric
>> >
>> > "Shawn" wrote:
>> >
>> > > Sorry needed to correct first post
>> > >
>> > > How do I access a Date picker on a Multipage?
>> > > I want to assign it a value.
>> > > I have tried
>> > >
>> > > frmTMF.MultiPage1.DTPickerReviewDate.Value = Date
>> > > and
>> > > frmTMF.DTPickerReviewDate.Value = Date
>> > >
>> > > first returns error 438 - Object doesn't support this property or
>> > > method
>> > > second returns error 35788 - An error occured in a call to the
>> > > windows date
>> > > and time picker control