Thanks to all who replied.  Automation is obviously the way to go and the
replies will help a great deal.  Unfortunately a series of minor domestic
issues have meant that I've not been able to look at the problem for a few
days but hope to get on to it soon.

Regards

John 

John Weller
01380 723235
07976 393631


> -----Original Message-----
> From: ProfoxTech [mailto:[email protected]] On Behalf Of
> IOAN-LIVIU SARA
> Sent: 16 February 2013 15:05
> To: [email protected]
> Subject: Re: Import From Excel
> 
> Hello John,
> 
> 
>     Try this code:
> 
> *************************************
> LcFlSrcXls="c:\book1.xls"
> import from (LcFlSrcXls) xls
> alter table book1 alter column (field(3)) M
> 
> oleapp = CREATEOBJECT("Excel.Application") OleApp.DisplayAlerts = .f.
> =oleapp.Workbooks.Open(LcFlSrcXls)
> 
> sele book1
> iscan=0
> scan
> iscan=iscan+1
> replace (field(3)) with
oleapp.ActiveSheet.Range("C"+alltr(str(iscan))).Text
> endscan
> 
> oleapp.Workbooks.Close
> OleApp.Quit
> RELEASE oleapp
> 
> *************************************
> Succes!
> 
> Liviu.
> 
> 
> 
> ________________________________
>  From: John Weller <[email protected]>
> To: [email protected]
> Sent: Tuesday, February 12, 2013 12:43 PM
> Subject: Import From Excel
> 
> I have some data in the form of an Excel spread sheet which I want to
import
> into a table.  The problem is that one column has some entries that are
more
> than 254 characters.  I want to import that into a memo field but APPEND
> does not support appending into memo fields and APPEND MEMO appears
> to just append one text file to one field.
> 
> Any suggestions?  If all else fails I will split them by hand into 200
character
> blocks and then concatenate them once they are imported but as there are
> about 300 rows I'd prefer to do it as a programme.
> 
> John Weller
> 01380 723235
> 07976 393631
> 
> 
> 
> 
[excessive quoting removed by server]

_______________________________________________
Post Messages to: [email protected]
Subscription Maintenance: http://mail.leafe.com/mailman/listinfo/profox
OT-free version of this list: http://mail.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.

Reply via email to