Dear Mr. Rao,
if have 2 questions concerning TOEXCEL()
With the German version of EXCEL numeric values need a comma as instead of a dot.
Is there a setup for this?
If there are text fields containing a RETURN you get wrong export results.
Thanks in advance
Otto
METHOD ClpRow( lFullRow, aCols ) CLASS TXBrowse
local n, RetVal := ""
DEFAULT lFullRow := ( ::nMarqueeStyle >= 4 ) .or. aCols != nil
DEFAULT aCols := ::GetVisibleCols()
if lFullRow
for n := 1 to Len( aCols )
if aCols[ n ]:cDataType == 'N'
RetVal += StrTran( StrTran( StrTran( aCols[ n ]:ClpText, ".", "," ), CRLF, " ; " ), Chr(9), ' ' ) + Chr( 9 )
else
RetVal += StrTran( StrTran( StrTran( aCols[ n ]:ClpText, CRLF, "" ), Chr(13), " ; " ), Chr(9), ' ' ) + Chr( 9 )
endif
next
else
RetVal := StrTran( StrTran( ::SelectedCol():ClpText, CRLF, " ; " ), Chr(9), ' ' )
endif
return RetVal
//----------------------------------------------------------------------------//About RETURN in text values:
We were substituting SEMICOLON for CRLF. We were not testing for single CHR(13). We can now add that too.
Instead of SEMICOLON is it not okay to substitute CRLF, CR, LF, TAB with SINGLE SPACE?
About Numeric Values:
Before we finalize any modifications, can you please help me with the following simple test?
Please type 23.45 in Notepad. Copy and Paste this text 23.45 into a cell in excel sheet. Does this give an error? I do not think so.
Can you please test and let me know?
Dear Mr. Rao,
Sometimes users copy & paste parts of the name, town, street from the internet. This way it is possible that a CR is part of the text inside the dbf-fields.
>Please type 23.45 in Notepad. Copy and Paste this text 23.45 into a cell in excel sheet. Does this give an error? I do not think so.
>Can you please test and let me know?
It does not give an error but inside EXCEL it is a string. As you format the cell first you can’t do anything inside the column.
It is like “editing prohibited” but I controlled and then I changed the code like I posted and all works fine.
Best regards,
Otto
Mag. Otto Atzwanger
Thanks and appreciate the feedback.
This should be giving problem to all users of European Lang installations. Wondering why till now no user has complained. Before making final modifications in the xbrowse.prg, we like to invite comments from other users too, using Spanish, Italian, etc. installations of Excel.
