R
Raquel
Hello,
I am trying to insert an excel worksheet in a powerpoint presentation as an
OLE object from an access tool.
What I am doing is:
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")
If I run it in debug mode line by line, it works. But if I allow to run it
alone, the inserted worksheet is empty.
Could anyone help me with this?
Best regards,
Raquel
I am trying to insert an excel worksheet in a powerpoint presentation as an
OLE object from an access tool.
What I am doing is:
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")
If I run it in debug mode line by line, it works. But if I allow to run it
alone, the inserted worksheet is empty.
Could anyone help me with this?
Best regards,
Raquel