Our horses are assigned tattoo numbers of 6 characters (letters and digits).
Horses with tattoos consisting of the first character being a number, the
second an "E", and the third a zero, are assigned the "Scientic cell
format", and appear as such in the resultant Excel file.
Tattoo number 6E0119 shows up in the Excel file as 6.00E+119.
Is there a automation command to fix this?
select tattoo from horse into cursor sys(2015)
oexcel = createobject("excel.application")
obook = oexcel.workbooks.add()
orange = oexcel.activesheet.range("a1:p1")
with oexcel.activesheet
.range("a1").value = "Tattoo"
orange = orange.offset(1,0)
scan
with orange
.columns[1].value = tattoo
endwith
orange = orange.offset(1,0)
endscan
with oexcel.activesheet
.columns[1].columnwidth = 10
endwith
endwith
James E Harvey
Hanover Shoe Farms, Inc.
M.I.S./Corresponding Officer
Off: 717-637-8931
fax: 717-637-6766
email: [EMAIL PROTECTED]
_______________________________________________
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.
