Excel to PowerPoint Paste with Keep Source Formatting

kpmsivaprakasam2003 · Jan 6th 2021

Hi i am using the excel 2013

I activated the excel and PowerPoint with 2 nos empty slides

Sheets "1" and "2" data range copy and paste to PowerPoint

this code paste with image, I need Paste with "Keep Source Formatting"

'Paste to PowerPoint and position

On Error Resume Next

Set shp = myPresentation.Slides(MySlideArray(x)).Shapes.PasteSpecial(DataType:=2) 'Excel 2007-2010

On Error GoTo 0

Please modification this code

thanks for your help

**royUK** · Jan 6th 2021

Welcome to the Forum. Please read the Forum Rules to understand how the Forum works and why I have added Code Tags to your post

All VBA code posted in the forum must be wrapped in code tags, which you omitted, including single-line code snippets.Be sure to use them in future posts.

How to use code tags

Note: no apostrophe in the tags, just used for demonstration here.

['code]

your code goes between these tags

['/code]

Or, just highlight all of the code and press the <> in the post menu above button to add the code tags.

Thanks.

**royUK** · Jan 6th 2021

Hw are you copying? It might be better to copy as picture

Code

Selection.CopyPicture Appearance:=xlScreen, Format:=xlPicture

Excel to PowerPoint Paste with Keep Source Formatting

Participate now!

Share

Tags