cnavarro wrote:This expression works?
oSheet:Cells( 1, 1 ):Value = CTOD( " Â / Â / Â " )
Enrico Maria Giordano wrote:Antonio,
Antonio Linares wrote:When you use an empty date with xHarbour what value do you get in the Excel cell ?
NIL
EMG
? oSheet:Cells( 1, 1 ):Value, VALTYPE( oSheet:Cells( 1, 1 ):Value )NIL UEnrico,
I meant what do you see in Excel. What is shown is Excel ?
Not the value that you get from Harbour.
Antonio Linares wrote:I meant what do you see in Excel. What is shown is Excel ?
Not the value that you get from Harbour.
Enrico,
have you tried this ?
oSheet:Cells( 1, 1 ):Value = nil
Antonio Linares wrote:have you tried this ?
oSheet:Cells( 1, 1 ):Value = nil
As of now there is no way except review all our code and modify wherever dates are assigned.
oSheet:Cells(r,c):NumberFormat := "dd-mm-yyyy" // or similar
oSheet:Cells(r,c):Value := If( Year(d) < 1900, nil, d )
I prefer
oSheet:Cells(r,c):Value := If( Year(d) < 1900, AdoNull(), d )
This works with ADO also.
Nages,
absolutely impractical... 
EMG
Dear friends,
any news? I'm stuck with my Harbour migration...
EMG
Enrico,
What is missing ?
I mean, something that really stops you to migrate to Harbour 
Enrico,
But this worked fine, right ?
oSheet:Cells( 1, 1 ):Value = nil
oSheet:Range( "A:A" ):Set( "NumberFormat", '00/00/00' ) // field mask
// sets headers
oSheet:Cells( 1, 1 ):value := "Date"
...
...
...
Do while ...
oSheet:Cells( nRow, 1 ):Value := ctod("")
...
....
nRow++
skip
EnddoAntonio Linares wrote:But this worked fine, right ?
oSheet:Cells( 1, 1 ):Value = nil
oSheet:Cells( 1, 1 ):Value = ""
oSheet:Cells( 1, 1 ):Value = 0
oSheet:Cells( 1, 1 ):Value = .F.