目前在网络上google 很多方式想要修改PPT中的图片大小
但看到的方式都是add_picture 之类的同时新增加修改
但由于我的来源是excel 所以我再复制图片的时候无法同时修改大小
不知道有没有方式可以选取图档修改呢?
import win32com.client
ExcelApp = win32com.client.Dispatch("Excel.Application")
ExcelApp.Visible = True
#Open the workbook
workbook =
ExcelApp.workbooks.Open(r"Excel raw.xlsx")
# Create a new instance of PowerPoint and make sure it's visible.
PPTApp = win32com.client.Dispatch("PowerPoint.Application")
PPTApp.Visible = True
Samplecount=int(input('Sample count :'))
PPTPresentation = PPTApp.Presentations.Open(r"PPT_Presentation.pptx")
for i in range(Samplecount):
chart1 = workbook.Worksheets(5+i).ChartObjects(2) #指定到chart
chart1.copy() #复制到剪贴簿
PPTSlide = PPTPresentation.Slides.Add(Index=i+7, Layout=12) #新增页面
PPTSlide.Shapes.PasteSpecial(DataType=3) #贴上Chart