Information générale
Catégorie:
COM/DCOM et OLE Automation
What kind of error message did you receive?
Create a file c:\xxx.xls and try this:
*------------------
oExcel=CreateObject("excel.application")
WITH oExcel
.Workbooks.Open("C:\XXX.XLS")
.Range("A2").Value="A2 on Page1"
.Range("D3").Value="D3 on Page 2"
.Range("F5").Value="F5 on Page 3"
.ActiveSheet.Columns(3).PageBreak = -4135
.ActiveSheet.Columns("E").PageBreak = -4135
ENDWITH
oExcel.ActiveWorkbook.Save
oExcel.Workbooks.Close
oExcel.quit
RELEASE oExcel
*---------
Try this sample, and let me know whether it works for you.
Best Wishes
>I was unable to get this to work? Is there another way, or one that someone >could elaborate a bit on?
Précédent
Répondre
Voir le fil de ce thread
Voir le fil de ce thread à partir de ce message seulement
Voir tous les messages de ce thread
Voir tous les messages de ce thread à partir de ce message seulement