Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Copy Worksheet in Excel
Message
From
06/07/2005 11:56:27
 
 
To
All
General information
Forum:
Visual FoxPro
Category:
COM/DCOM and OLE Automation
Title:
Copy Worksheet in Excel
Environment versions
Visual FoxPro:
VFP 6 SP3
Database:
Visual FoxPro
Miscellaneous
Thread ID:
01029539
Message ID:
01029539
Views:
56
Hello:

I have recorded a macro in Excel to copy a worksheet and came up with the following code:

Sheets("master").Select
Sheets("master").Copy After:=Sheets(2)
Sheets("master (2)").Select
Sheets("master (2)").Name="38730"

I added this to something I had that worked...
oleApp=createobject("Excel.Application")
oleApp.Workbooks.open("filename.xls")

...then added the code above as...
oleApp.Sheets("master").Select &&works fine
oleApp.Sheets("master").Copy After:=Sheets(2) &&BOMBED
oleApp.Sheets("master (2)").Select &&Didn't get this far
oleApp.Sheets("master (2)").Name="38730" &&Didn't get this far

Any suggestions are greatly appreciated.

Thanks,
Martha
Next
Reply
Map
View

Click here to load this message in the networking platform