使用Python从Excel到PowerPoint的图表

Question

我有一个使用优秀的"xlsxwriter"模块创建的excel工作簿.在这本工作簿中,大约有200个嵌入式图表.我现在正尝试将所有这些图表导出到几个功率点演示中.理想情况下,我希望保留原始格式和嵌入数据,而无需链接到外部Excel工作簿.

我相信有一种方法可以使用VBA来做到这一点.但是,我想知道是否有办法使用Python来做到这一点.有没有办法将xlsxwriter图表对象放入powerpoint？

我查看了python-pptx,找不到任何关于从excel工作簿中获取图表或数据系列的信息.

任何帮助表示赞赏!

Answer 1

花了几个小时尝试不同的东西后,我找到了解决这个问题的方法.希望它能帮助别人节省一些时间.以下代码将所有图表从"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 all the charts from excel
        chart.Activate()
        chart.Copy()  

        Slide=presentation.Slides.Add(presentation.Slides.Count+1,constants.ppLayoutBlank)
        Slide.Shapes.PasteSpecial(constants.ppPasteShape)

    # WE are going to make the title of slide the same chart title
    # This is optional 
    textbox=Slide.Shapes.AddTextbox(1,100,100,200,300)
    textbox.TextFrame.TextRange.Text=str(chart.Chart.ChartTitle.Text)

presentation.SaveAs("C:\\...........\\Final_PowerPoint.pptx")
presentation.Close()
workbook.Close()

print 'Charts Finished Copying to Powerpoint Presentation'

Excel.Quit()
PowerPoint.Quit()

Answer 2

我倾向于使用当前 python-pptx 版本的方法是读取 Excel 工作表中的数据并在 python-pptx 中重新创建图表。当然，这需要知道图表格式是什么等等，所以我可以明白为什么你可能不想这样做。

过去已经完成了直接从 Excel 导入图表的操作，请参阅 GitHub 上的拉取请求：https: //github.com/scanny/python-pptx/pull/65

但它涉及到对 python-pptx 的大量修改，以及现在的许多版本，所以它最多可能是一个关于哪些策略可能有效的很好的指南。你需要非常想要它，我想走那条路:)