用 Excel VBA 貼圖到 PowerPoint

Marry17Henry

貼到 PowerPoint 時 , 將圖片縮小就會失真 , 這該怎麼辦 ?
即使先在 Excel 上縮小 , 也會失真 ,
PowerPoint 上找不到錄製巨集功能 , 在 Excel 上用巨集操控 PowerPoint , 不容易啊 。

Marry17Henry

終於找到問題所在 ,
在貼圖表到 PowerPoint 時 , 用 .PasteSpecial 指令 貼成照片模式 : Slide.Shapes.PasteSpecial(Link:=msoCTrue).Select
而不要用 .Paste 指令 Slide.Shapes.Paste 直接貼上去 ,
如此圖表放大縮小時 , 就不會失真 。
另外畫圖表格現時 , 不要用虛線 , 要用實線 , 貼到 PowerPoint 後 , 放大縮小就不會失真 。