View Single Post
  #3   Report Post  
Posted to microsoft.public.excel.programming
RyanH RyanH is offline
external usenet poster
 
Posts: 586
Default Set DTPicker Date Value if it is not Visible on Userform

I wish it was that easy. I can't find any help on why you can't set a
DTPickers value if its Visible Property = False.


--
Cheers,
Ryan


"Mike" wrote:

Try this maybe
dtpScheduledShipDate .value
dtpActualShipDate.value

"RyanH" wrote:

I have a DTPicker that has its Visible Property set to False at design time.
When I try to set the value in my Worksheet Double Click Event VBA throws an
error, why?
ERROR: Run-Time Error '35788'. An error occured in a cell to the Windows
Date and Time Picker control. But when I set the Visible Property to True it
works, why?

Option Explicit

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As
Boolean)

' only assign a date value to DTPicker if there is a date in the cell,
' so todays date will show by default
If Not IsEmpty(Cells(Target.Row, "M")) Then
ERROR .dtpScheduledShipDate = Cells(Target.Row, "M")
End If
If Not IsEmpty(Cells(Target.Row, "N")) Then
ERROR .dtpActualShipDate = Cells(Target.Row, "N")
End If

' show userform
frmSalesSummary.Show
End Sub
--
Cheers,
Ryan