Date Time Picker : Error 35788

C

cosmoKen

Hi,

In a Excel VBA macro, I have a Date Time Picker from which I want to
read and write dates.

Properties of my DTPicker control :

..customformat = "dd/MM/yyyy"
..checkbox = true


Sub save_detail()
Dim MyDate As Date
[...]
If IsDate(MainForm.txtMepDate.value) Then
MyDate = CDate(MainForm.txtMepDate.value)
Worksheets("donnees").Cells(flux_line, 50).value = MyDate
Else
Worksheets("donnees").Cells(flux_line, 50).value = ""
End If
[...]
End Sub

Sub init_detail(selected_flux As String)
Dim MyDate As Date
[...]
If IsDate(Worksheets("donnees").Cells(flux_line, 50).value)
Then
MyDate = CDate(Worksheets("donnees").Cells(flux_line,
50).value)
MainForm.txtMepDate.value = MyDate
Else
MainForm.txtMepDate.value = Null
End If

[...]
End Sub


The part "save_detail" works good : I find in my workbook cell a valid
date "dd/MM/yyyy hh:mm:ss"

But for the init_detail, it works good until I close the workbook and
reopen it.
Values saved before I close the workbook cannot be set with
init_detail, I have the error :

Error n°35788 : "An error occured in a call to the Windows Date and
Time Picker control"


I have tried many things I have read (window visible, change custom
format, etc.) but no solution.


Thanks for help
 
C

cosmoKen

I found the solution of my own question :

Just before setting the value, it has to be visible.
So, because I'm in a multipage control, I add before :
Me.multiPage1.value=1 '1 is the tab index where the DTPicker is placed

Thanks me ;)
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Top