python ppt自动生成_如何自动化生成PPT缩略图？

搜到的代码,可能得自己改一下.

'' 导出当前文件夹下所有 PowerPoint 演示文稿的第一张幻灯片

'' 并以图形文件格式保存在当前文件夹下

'' 变量声明和初始化

Dim wShell, pptApp, fso, folder, file, slide, outFile

Set wShell = WScript.CreateObject("WScript.Shell")

'' 获取当前文件夹

Set fso = CreateObject("Scripting.FileSystemObject")

Set folder = fso.GetFolder(wShell.CurrentDirectory)

Set fso = Nothing

'MsgBox(folder.Path)

'' 打开 PowerPoint 应用程序

Set pptApp = WScript.CreateObject("PowerPoint.Application")

pptApp.Activate

'' 遍历当前文件夹下所有文件

For Each file in folder.Files

'' 如果文件扩展名为 ppt(根据实际需要和 PowerPoint 程序版本，还可以是 pps, pptx 等)

If UCase(Mid(file.Name, InstrRev(file.Name, ".") + 1)) = "PPT" Then

' MsgBox(file.Name)

'' 设置输出文件名，此处使用原演示文稿名称

outFile = Trim(Left(file.Path, InStrRev(file.Path, ".") - 1)) & ".jpg"

' MsgBox(outFile)

pptApp.Presentations.Open file.Path

'' 此处只需要第一张幻灯片

Set slide = pptApp.ActivePresentation.Slides(1)

'' 如果需要导出多张幻灯片，使用如下循环

' For Each slide in pptApp.ActivePresentation.Slides.Range(1)

'' Export(String FileName, String FilterName, Long ScaleWidth, Long ScaleHeight)

'' FilterName 可以为 gif, jpg, png, bmp, wmf, tif 等。

slide.Export outFile, "jpg", 320, 240

' Next

pptApp.Presentations(1).Close

End If

'' 退出 PowerPoint 应用程序

pptApp.Quit

'' 清理对象

Set pptApp = Nothing

Set wShell = Nothing

python ppt自动生成_如何自动化生成PPT缩略图？相关推荐

python做圆柱绕流_基于snappyHexMesh生成网格的圆柱绕流算例
基于snappyHexMesh生成网格的圆柱绕流算例 1.创建几何体STL文件在了解了原理之后,要生成网格第一步就是要创建一个几何体的STL文件,可以使用3Dbulider,3DCAD等软件生成几何 ...
python怎么自动抢红包_抢红包，我还真没落下过！每个都抢得到！用Python实现自动抢红包...
原标题:抢红包,我还真没落下过!每个都抢得到!用Python实现自动抢红包前言曾经有一份很大的红包,摆在我的面前,我没有好好珍惜,如果上天再给我一次机会,我会对发红包的人说三个字:再来个! 今天小 ...
python 人形自动标注_自动设置人形生物
python 人形自动标注 The humanoid animation option in Unity 4 makes it possible to retarget the same animat ...
干活的不如写ppt的吗_“干活不如写PPT”为啥扎心？
原标题:"干活不如写PPT"为啥扎心? 累死累活,不如做PPT的.近日,中国青年报社一项调查显示,超六成受访者对工作汇报重形式.轻实质的倾向表示反感. "累死累活,有成果 ...
python tempfile自动删除_Python tempfile模块生成临时文件和临时目录
tempfile 模块专门用于创建临时文件和临时目录,它既可以在 UNIX 平台上运行良好,也可以在 Windows 平台上运行良好. tempfile 模块中常用的函数,如表 1 所示. 表 1 t ...
python评语生成_如何评价生成模型框架 ZhuSuan?
抛砖引玉: 整个平台是清华大学副教授朱军的学生们主导的,有国家经费的支持,个人觉得是一个很有意义的项目.先搬砖翻译项目介绍:珠算(ZhuSuan)是一个构建于 TensorFlow 之上的用于生成模型 ...
python 折线图平滑_使用matplotlib生成平滑折线图
以下是使用matplotlib生成图的python脚本.使用matplotlib生成平滑折线图 #!/usr/bin/python import matplotlib.pyplot as plt im ...
python 连续输出日期_我想生成连续的日期
我有这样的代码:import time from datetime import date startyear = raw_input("start year: ") startm ...
python 多帧超分辨_利用python-opencv生成视频帧数控制，和常见错误总结
首先呢利用opencv生成视频的例子相信网络上已经很多了.但是大多数例子都只是捕获一个摄像头就没了.但是在实际运用中会发现.因为涉及到图像处理,生成的视频要不就就是过快要不就是比实际时间长. 控制视 ...

python ppt自动生成_如何自动化生成PPT缩略图？

python ppt自动生成_如何自动化生成PPT缩略图？相关推荐

最新文章

热门文章