Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Excel Automation
Message
De
29/07/2002 09:07:44
 
 
À
29/07/2002 09:06:14
Information générale
Forum:
Visual FoxPro
Catégorie:
COM/DCOM et OLE Automation
Divers
Thread ID:
00683467
Message ID:
00683475
Vues:
32
This is going to turn into a long thread if I don't wake up soon. Forget my previous post. oW.ActiveSheet.Paste is what you want.

Alan

>Whoops!! Then change the oW.ActiveSheet.Paste line to read oRange.Paste.
>
>Alan
>
>>Probably better to do it in code. After the 'oRange=' line, add a line: oRange.Select()
>>
>>Alan
>>
>>>I fixed it by moving the cursor into the right cell in the template.
>>>
>>>
>>>
>>>>I have a Excel Spreadsheet with headers and formats but no data.
>>>>
>>>>inVFP I crate a curser then:
>>>>_VFP.DataToClip(,,3)
>>>>
>>>>oE=CREATE("Excel.Application")
>>>>oW=oE.Workbooks.Open("MYTEMPLATE.xls")
>>>>oRange=oe.activeSheet.Range("A7:V7")
>>>>oW.ActiveSheet.Paste
>>>>
>>>>ANd it inserts starting at cell A2 instead of A7 thus overwriting my headers
>>>>
>>>>
>>>>What am I doing wrong???
>>>>
>>>>Thanks
>>>>
>>>>Peter
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform