Visual Basic para Aplicaciones - Insertar excel en powerpoint

Life is soft - evento anual de software empresarial
   
Vista:

Insertar excel en powerpoint

Publicado por raquelV (3 intervenciones) el 02/03/2009 12:26:48
Hola,

tengo una hoja excel que quiero insertar en un powerpoint. Para ello lo que he hecho ha sido insertar un objeto OLE y luego a este copiarle el contenido de mi worksheet:

Dim extbl As Object

Set extbl = ObjPowerPoint.ActivePresentation.Slides(1).Shapes.AddOLEObject(Left:=120, Top:=110, Width:=480, Height:=320, ClassName:="Excel.Sheet", Link:=msoFalse, DisplayAsIcon:=msoTrue, IconIndex:=1)

Myworksheet.RangeMyworksheet.Cells(1, 1), Myworksheet.Cells(100, 8)).Copy extbl.OLEFormat.Object.Worksheets(1).Range("A1")

Mi problema es que si lo corro con debug, no me da ningun problema, pero si lo dejo correr "solo", me inserta la excel en la diapositiva sin problemas, pero siempre esta vacia.

¿A alguien le ha pasado esto alguna vez?

Gracias por adelantado,

Raquel
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder