weixin_39603995 于 2020-12-07 13:01:45 发布
使用Python的win32com库，将`workbook_with_charts.xlsx`中的所有图表复制并粘贴到`Final_PowerPoint.pptx`。在CMD终端运行程序效果更佳，可能在Office 2013中遇到问题，需要调整Presentations.Add参数。代码通过遍历工作表和图表对象，激活并复制Excel图表，然后在PowerPoint的空白幻灯片上粘贴为形状。 花了几个小时尝试不同的东西后,我找到了解决这个问题的方法.希望它能帮助别人节省一些时间.以下代码将所有图表从“workbook_with_charts.xlsx”复制到“Final_PowerPoint.pptx”.
出于某种原因,我还没理解,从CMD终端运行这个Python程序时效果更好.如果您尝试多次运行,有时会发生故障,即使第一次运行通常没问题.
另一个问题是,在第五行中,如果使用“presentation = PowerPoint.Presentations.Add(False)”生成False,则它不适用于Microsoft Office 2013,即使“True”和“False”仍然可以使用Microsoft Office 2010.
如果有人能够澄清这两个问题,那将会很棒.
# importing the necessary libraries
import win32com.client
from win32com.client import constants
PowerPoint=win32com.client.Dispatch("PowerPoint.Application")
Excel=win32com.client.Dispatch("Excel.Application")
presentation=PowerPoint.Presentations.Add(True)
workbook=Excel.Workbooks.Open(Filename="C:.........workbook_with_charts.xlsx",ReadOnly=1,UpdateLinks=False)
for ws in workbook.Worksheets:
for chart in ws.ChartObjects():
# Copying a
