Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Text values > length 255 won't *quite* go into Excel 200
Message
From
26/04/2001 17:40:30
 
 
To
26/04/2001 15:45:47
General information
Forum:
Visual FoxPro
Category:
COM/DCOM and OLE Automation
Miscellaneous
Thread ID:
00500341
Message ID:
00500427
Views:
18
Jim --

I haven't encountered this problem, but here's something to try.

Test the string to see if it's longer than 255. If so, put in a loop and assign only 254 characters at a time to the cell. Perhaps that would emulate the manual insertion of characters.
cMemoRest = cMemoText
nMemoLen = MIN (LEN (cMemoRest), 254)
DO WHILE nMemoLen > 0
    cMemoInsert = LEFT (cMemoRest, nMemoLen)
    mysheet.activecell.Value = mysheet.activecell.Value + cMemoInsert
    cMemoRest = IIF (nMemoLen < LEN (cMemoRest), SUBSTR (cMemoRest, nMemoLen + 1), "")
    nMemoLen = MIN (LEN (cMemoRest), 254)
ENDDO
Jay
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform