Automatizacion Excel
Publicado por Natalia (6 intervenciones) el 18/12/2006 15:39:21
Hola, con automatizacion de excel cree un grafico en una hoja de un libro. Con chartarea.copy lo copie al portapapeles. Ahora cree otra instancia de excel y quiero pegar el grafico; las sentencias de este ultimo proceso son:
loExcel2=CREATEOBJECT("Excel.application")
WITH loExcel2.APPLICATION
.workbooks.add
.worksheets(1).activate
.WORKSHEETS(1).range("b1").select
.worksheets(1).paste
.
.
.
(esta sentencia me da un error OLE Dispatch: imposible encontrar la propiedad paste para la clase worksheet)
.activeworkbook.SAVEas("prueba")
.workbooks.CLOSE
ENDWITH
Alguien tiene idea que puede ser? Gracias
Natalia
loExcel2=CREATEOBJECT("Excel.application")
WITH loExcel2.APPLICATION
.workbooks.add
.worksheets(1).activate
.WORKSHEETS(1).range("b1").select
.worksheets(1).paste
.
.
.
(esta sentencia me da un error OLE Dispatch: imposible encontrar la propiedad paste para la clase worksheet)
.activeworkbook.SAVEas("prueba")
.workbooks.CLOSE
ENDWITH
Alguien tiene idea que puede ser? Gracias
Natalia
Valora esta pregunta


0