General information
Category:
COM/DCOM and OLE Automation
Title:
Copy Worksheet in Excel
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
View the map of this thread
View the map of this thread starting from this message only
View all messages of this thread
View all messages of this thread starting from this message only