import win32comimport win32com.client def makePPT(path): ppt=win32com.client.Dispatch("PowerPoint.Application") ppt.Visible=True #增加一个文件 pptFile=ppt.Presentations.Add() #创建页 page1=pptFile.Slides.Add(1,1)#参数1为页数(第一页开始),参数2为类型(按照PPT主题排列) #page1.Shapes[0]获取第一个框 t1=page1.Shapes[0].TextFrame.TextRange#在框内写入内容 t1.Text="下雨天" t2 = page1.Shapes[1].TextFrame.TextRange t2.Text = "要带伞" #t3 = page1.Shapes[2].TextFrame.TextRange#只有两个框,这个不打印 #t3.Text = "的一个人" page2 = pptFile.Slides.Add(2, 1) # # page1.Shapes[0]获取第一个框 t1 = page2.Shapes[0].TextFrame.TextRange # 在框内写入内容 t1.Text = "那么多" t2 = page2.Shapes[1].TextFrame.TextRange t2.Text = "的人" #保存 pptFile.SaveAs(path) #关闭 pptFile.Close() ppt.Quit()path=r"D:\x"makePPT(path)
原文地址:https://www.cnblogs.com/zlong123/p/10508011.html
时间: 2024-11-07 18:04:50