作者kogar (哈哈哥)
看板Office
标题[算表] VBA 贴上图片到PPT的怪问题
时间Tue May 10 16:29:26 2022
软体:EXCEL
版本:2010
小弟发生一件怪事
我用VBA写了一段程式，把EXCEL一部分的RANGE贴到PPT上
如下
Worksheets(i).Select
Range("a1:s22").Select
Selection.Copy
currentSlide.Shapes.PasteSpecial(DataType:=ppPasteMetafilePicture).Select
newPP.ActiveWindow.Selection.ShapeRange.Left = 80
newPP.ActiveWindow.Selection.ShapeRange.Width = 810
newPP.ActiveWindow.Selection.ShapeRange.Top = 80
但不知道为什麽，我逐步执行来看
COPY的RANGE是A1:S22没错
但贴上时，图片会被截断
会变成贴上大约是A1:N22这个RANGE
有够怪
如果改成ppPasteOLEObject就没问题啦
但ppPasteOLEObject解析度就比较差，我还是想贴图片
可以请问版上的高手，
这是甚麽问题吗?
谢谢
--
※ 发信站: 批踢踢实业坊(ptt.cc), 来自: 59.120.118.229 (台湾)
※ 文章网址: https://webptt.com/cn.aspx?n=bbs/Office/M.1652171368.A.D2E.html