Garry Bettle wrote:
> <snip>
> I don't know why but I can't ... code to follow:
>
> oExcel = CREATEOBJECT( [Excel.Application])
> IF VARTYPE( oExcel) != [O]
> * could not instantiate Excel object
> RETURN .F.
> ENDIF
>
> oExcel.SheetsInNewWorkbook = 1
> oExcel.Workbooks.CLOSE
> oExcel.Workbooks.ADD
> oExcel.VISIBLE = .F.
> * lcLinest = [12.5,13,12.5,12,13,12.5,13,12.5,12,12.5,13]
> lcLinest = [12.5,13,14]
> lnLinest = 0
> IF !EMPTY( lcLinest)
> lnWordCount = GETWORDCOUNT( lcLinest, [,])
> IF lnWordCount >= 3
> lcClipText = [=linest({] + lcLinest + [})]
> oExcel.Range("A1").Select
> oExcel.Range("A1").value = lcCliptext
> oExcel.Range("A1").NumberFormat = '0.00000'
>
Hi Garry,
Just tried recording a macro and did 2 decimal places and show thousand
character which produced
Selection.NumberFormat = "#,##0.00"
Try getting the format you want in excel and make sure you record it so
you can get the code. What format do you want?
Peter
_______________________________________________
Post Messages to: [email protected]
Subscription Maintenance: http://leafe.com/mailman/listinfo/profox
OT-free version of this list: http://leafe.com/mailman/listinfo/profoxtech
Searchable Archive: http://leafe.com/archives/search/profox
This message: http://leafe.com/archives/byMID/profox/[EMAIL PROTECTED]
** All postings, unless explicitly stated otherwise, are the opinions of the
author, and do not constitute legal or medical advice. This statement is added
to the messages for those lawyers who are too stupid to see the obvious.
