Insert a Excel table in an existing PowerPoint table
Hi,
I'm would like to insert a selected excel range[ActiveSheet.Range("A4:E" & NbItems).Copy] in an empty PowerPoint table [2 rows, two columns]. If I do it manually it works perfectly so I beleive that this is possible to acheive with VBA
So what I did is the following
With PPtApp
.ActivePresentation.Slides(.ActivePresentation.Sli des.count - 1).Shapes(3).Table.Cell(1, 1).Select
Selection.PasteSpecial DataType:=ppPasteDefault
End With
"Selection.PasteSpecial DataType:=ppPasteDefault" doesn't work. I've VBA message : Run-time error '1004': Application-defined or object-defined error
Thanks a lot in advance for your support!
|