Python办公自动化之批量遍历删除某个目录下的PPT最后一页

Python办公自动化之批量遍历删除某个目录下的PPT最后一页

背景

爬了一堆的PPT，结果发现每一份的PPT最后面一页全是广告，所以，使用python脚本，利用pptx库自动批量删除某个目录下的PPT最后一页。

安装

pip install python-pptx

 

代码如下：

from pptx import Presentation
import os

def del_ppt_max_page(file):
    # 读取ppt
    prs = Presentation(file)
    # 查看一共几页
    slides = prs.slides
    number_pages = len(slides)
    print('file={},总页数={}'.format(file,number_pages))
    # 删除最后一页
    rId = prs.slides._sldIdLst[-1].rId
    prs.part.drop_rel(rId)
    del prs.slides._sldIdLst[-1]
    # 保存新的ppt
    prs.save(file)


def list_dir_more(CurPath=os.getcwd(), file_list=[]):
    FileList = os.listdir(CurPath)
    # print FileList
    for File in FileList:
        SubPath = CurPath + '\\' + File
        if os.path.isdir(SubPath):
            list_dir_more(SubPath, file_list)
        else:
            file_list.append(SubPath)
    
    # print('file_list={}'.format(file_list))
    return file_list

if __name__ =="__main__":
    file_list=list_dir_more('.\PPT\课件')
    count=1
    for file in file_list:
        try:
            if '.ppt' in file:
                print('正在处理第 {}/{} 个文件：{}'.format(count,len(file_list),file))
                del_ppt_max_page(file)
            
        except BaseException as del_err:
            print('第 {}/{} 个文件：{} ,处理失败，失败信息：{}'.format(count, len(file_list), file,del_err))

        count += 1

执行结果

D:\Python\Python37-32\python.exe D:/Python/work/爬虫/爬虫工具/遍历目录删除PPT最后一页.py
正在处理第 1/2048 个文件：D:\\PPT\课件\人教版数学PPT课件\人教版一年级上册数学PPT课件\《0的认识和加减法》人教版小学数学一年级上册PPT课件（第3.2课时）.pptx
file=D:\\PPT\课件\人教版数学PPT课件\人教版一年级上册数学PPT课件\《0的认识和加减法》人教版小学数学一年级上册PPT课件（第3.2课时）.pptx,总页数=18
正在处理第 2/2048 个文件：D:\\PPT\课件\人教版数学PPT课件\人教版一年级上册数学PPT课件\《1-5的认识》人教版小学数学一年级上册PPT课件（第3.1课时）.pptx
file=D:\\PPT\课件\人教版数学PPT课件\人教版一年级上册数学PPT课件\《1-5的认识》人教版小学数学一年级上册PPT课件（第3.1课时）.pptx,总页数=10
正在处理第 3/2048 个文件：D:\\PPT\课件\人教版数学PPT课件\人教版一年级上册数学PPT课件\《10的加减法》人教版小学数学一年级上册PPT课件（第5.3课时）.pptx
file=D:\\PPT\课件\人教版数学PPT课件\人教版一年级上册数学PPT课件\《10的加减法》人教版小学数学一年级上册PPT课件（第5.3课时）.pptx,总页数=15
正在处理第 4/2048 个文件：D:\\PPT\课件\人教版数学PPT课件\人教版一年级上册数学PPT课件\《11-20各数的写法》人教版小学数学一年级上册PPT课件（第6.2课时）.pptx
file=D:\\PPT\课件\人教版数学PPT课件\人教版一年级上册数学PPT课件\《11-20各数的写法》人教版小学数学一年级上册PPT课件（第6.2课时）.pptx,总页数=11
正在处理第 5/2048 个文件：D:\\PPT\课件\人教版数学PPT课件\人教版一年级上册数学PPT课件\《5、4、3加几》人教版小学数学一年级上册PPT课件（第8.1课时）.pptx
file=D:\\PPT\课件\人教版数学PPT课件\人教版一年级上册数学PPT课件\《5、4、3加几》人教版小学数学一年级上册PPT课件（第8.1课时）.pptx,总页数=13
正在处理第 6/2048 个文件：D:\\PPT\课件\人教版数学PPT课件\人教版一年级上册数学PPT课件\《6和7的加减法》人教版小学数学一年级上册PPT课件（第5.1课时）.pptx
file=D:\\PPT\课件\人教版数学PPT课件\人教版一年级上册数学PPT课件\《6和7的加减法》人教版小学数学一年级上册PPT课件（第5.1课时）.pptx,总页数=9
正在处理第 7/2048 个文件：D:\\PPT\课件\人教版数学PPT课件\人教版一年级上册数学PPT课件\《8、7、6加几》人教版小学数学一年级上册PPT课件（第8.2课时）.pptx
file=D:\\PPT\课件\人教版数学PPT课件\人教版一年级上册数学PPT课件\《8、7、6加几》人教版小学数学一年级上册PPT课件（第8.2课时）.pptx,总页数=19
正在处理第 8/2048 个文件：D:\\PPT\课件\人教版数学PPT课件\人教版一年级上册数学PPT课件\《8和9的加减法》人教版小学数学一年级上册PPT课件（第5.2课时）.pptx
file=D:\\PPT\课件\人教版数学PPT课件\人教版一年级上册数学PPT课件\《8和9的加减法》人教版小学数学一年级上册PPT课件（第5.2课时）.pptx,总页数=10
正在处理第 9/2048 个文件：D:\\PPT\课件\人教版数学PPT课件\人教版一年级上册数学PPT课件\《上下前后》人教版小学数学一年级上册PPT课件（第2.1课时）.pptx
file=D:\\PPT\课件\人教版数学PPT课件\人教版一年级上册数学PPT课件\《上下前后》人教版小学数学一年级上册PPT课件（第2.1课时）.pptx,总页数=16
正在处理第 10/2048 个文件：D:\\PPT\课件\人教版数学PPT课件\人教版一年级上册数学PPT课件\《减法》人教版小学数学一年级上册PPT课件（第3.7课时）.pptx
file=D:\\PPT\课件\人教版数学PPT课件\人教版一年级上册数学PPT课件\《减法》人教版小学数学一年级上册PPT课件（第3.7课时）.pptx,总页数=12
正在处理第 11/2048 个文件：D:\\PPT\课件\人教版数学PPT课件\人教版一年级上册数学PPT课件\《分与合》人教版小学数学一年级上册PPT课件（第3.4课时）.pptx
file=D:\\PPT\课件\人教版数学PPT课件\人教版一年级上册数学PPT课件\《分与合》人教版小学数学一年级上册PPT课件（第3.4课时）.pptx,总页数=13
正在处理第 12/2048 个文件：D:\\PPT\课件\人教版数学PPT课件\人教版一年级上册数学PPT课件\《加减混合》人教版小学数学一年级上册PPT课件（第5.5课时）.pptx
file=D:\\PPT\课件\人教版数学PPT课件\人教版一年级上册数学PPT课件\《加减混合》人教版小学数学一年级上册PPT课件（第5.5课时）.pptx,总页数=18
正在处理第 13/2048 个文件：D:\\PPT\课件\人教版数学PPT课件\人教版一年级上册数学PPT课件\《加法》人教版小学数学一年级上册PPT课件（第3.6课时）.pptx
file=D:\\PPT\课件\人教版数学PPT课件\人教版一年级上册数学PPT课件\《加法》人教版小学数学一年级上册PPT课件（第3.6课时）.pptx,总页数=11
正在处理第 14/2048 个文件：D:\\PPT\课件\人教版数学PPT课件\人教版一年级上册数学PPT课件\《左、右》人教版小学数学一年级上册PPT课件（第2.2课时）.pptx
file=D:\\PPT\课件\人教版数学PPT课件\人教版一年级上册数学PPT课件\《左、右》人教版小学数学一年级上册PPT课件（第2.2课时）.pptx,总页数=10
正在处理第 15/2048 个文件：D:\\PPT\课件\人教版数学PPT课件\人教版一年级上册数学PPT课件\《数一数》人教版小学数学一年级上册PPT课件（第1.2课时）.pptx
file=D:\\PPT\课件\人教版数学PPT课件\人教版一年级上册数学PPT课件\《数一数》人教版小学数学一年级上册PPT课件（第1.2课时）.pptx,总页数=26
正在处理第 16/2048 个文件：D:\\PPT\课件\人教版数学PPT课件\人教版一年级上册数学PPT课件\《比多少》人教版小学数学一年级上册PPT课件（第1.1课时）.pptx
file=D:\\PPT\课件\人教版数学PPT课件\人教版一年级上册数学PPT课件\《比多少》人教版小学数学一年级上册PPT课件（第1.1课时）.pptx,总页数=21
正在处理第 17/2048 个文件：D:\\PPT\课件\人教版数学PPT课件\人教版一年级上册数学PPT课件\《比大小》人教版小学数学一年级上册PPT课件（第3.5课时）.pptx
file=D:\\PPT\课件\人教版数学PPT课件\人教版一年级上册数学PPT课件\《比大小》人教版小学数学一年级上册PPT课件（第3.5课时）.pptx,总页数=14
正在处理第 18/2048 个文件：D:\\PPT\课件\人教版数学PPT课件\人教版一年级上册数学PPT课件\《第几》人教版小学数学一年级上册PPT课件（第3.3课时）.pptx
file=D:\\PPT\课件\人教版数学PPT课件\人教版一年级上册数学PPT课件\《第几》人教版小学数学一年级上册PPT课件（第3.3课时）.pptx,总页数=14
正在处理第 19/2048 个文件：D:\\PPT\课件\人教版数学PPT课件\人教版一年级上册数学PPT课件\《认识图形》人教版小学数学一年级上册PPT课件（第4.1课时）.pptx
file=D:\\PPT\课件\人教版数学PPT课件\人教版一年级上册数学PPT课件\《认识图形》人教版小学数学一年级上册PPT课件（第4.1课时）.pptx,总页数=15
正在处理第 20/2048 个文件：D:\\PPT\课件\人教版数学PPT课件\人教版一年级上册数学PPT课件\《认识整时》人教版小学数学一年级上册PPT课件（第7.1课时）.pptx
file=D:\\PPT\课件\人教版数学PPT课件\人教版一年级上册数学PPT课件\《认识整时》人教版小学数学一年级上册PPT课件（第7.1课时）.pptx,总页数=13
正在处理第 21/2048 个文件：D:\\PPT\课件\人教版数学PPT课件\人教版一年级上册数学PPT课件\《认识钟表》人教版小学数学一年级上册PPT课件（第7.2课时）.pptx
file=D:\\PPT\课件\人教版数学PPT课件\人教版一年级上册数学PPT课件\《认识钟表》人教版小学数学一年级上册PPT课件（第7.2课时）.pptx,总页数=11
正在处理第 22/2048 个文件：D:\\PPT\课件\人教版数学PPT课件\人教版一年级上册数学PPT课件\《连加连减》人教版小学数学一年级上册PPT课件（第5.4课时）.pptx
file=D:\\PPT\课件\人教版数学PPT课件\人教版一年级上册数学PPT课件\《连加连减》人教版小学数学一年级上册PPT课件（第5.4课时）.pptx,总页数=27
正在处理第 23/2048 个文件：D:\\PPT\课件\人教版数学PPT课件\人教版一年级下册数学PPT课件\《 十几减9》人教版小学数学一年级下册PPT课件（第2.1课时）.pptx
file=D:\\PPT\课件\人教版数学PPT课件\人教版一年级下册数学PPT课件\《 十几减9》人教版小学数学一年级下册PPT课件（第2.1课时）.pptx,总页数=22
正在处理第 24/2048 个文件：D:\\PPT\课件\人教版数学PPT课件\人教版一年级下册数学PPT课件\《 数数 数的组成》人教版小学数学一年级下册PPT课件（第4.1课时）.pptx
file=D:\\PPT\课件\人教版数学PPT课件\人教版一年级下册数学PPT课件\《 数数 数的组成》人教版小学数学一年级下册PPT课件（第4.1课时）.pptx,总页数=32
正在处理第 25/2048 个文件：D:\\PPT\课件\人教版数学PPT课件\人教版一年级下册数学PPT课件\《100以内数的读、写》人教版小学数学一年级下册PPT课件（第4.2课时）.pptx
file=D:\\PPT\课件\人教版数学PPT课件\人教版一年级下册数学PPT课件\《100以内数的读、写》人教版小学数学一年级下册PPT课件（第4.2课时）.pptx,总页数=26
正在处理第 26/2048 个文件：D:\\PPT\课件\人教版数学PPT课件\人教版一年级下册数学PPT课件\《两位数减一位数、整十数（不退位减）》人教版小学数学一年级下册PPT课件（第6.4课时）.pptx
file=D:\\PPT\课件\人教版数学PPT课件\人教版一年级下册数学PPT课件\《两位数减一位数、整十数（不退位减）》人教版小学数学一年级下册PPT课件（第6.4课时）.pptx,总页数=27
正在处理第 27/2048 个文件：D:\\PPT\课件\人教版数学PPT课件\人教版一年级下册数学PPT课件\《两位数减一位数、整十数（退位减）》人教版小学数学一年级下册PPT课件（第6.5课时）.pptx
file=D:\\PPT\课件\人教版数学PPT课件\人教版一年级下册数学PPT课件\《两位数减一位数、整十数（退位减）》人教版小学数学一年级下册PPT课件（第6.5课时）.pptx,总页数=22
正在处理第 28/2048 个文件：D:\\PPT\课件\人教版数学PPT课件\人教版一年级下册数学PPT课件\《两位数加一位数、整十数》人教版小学数学一年级下册PPT课件（第6.2课时）.pptx
file=D:\\PPT\课件\人教版数学PPT课件\人教版一年级下册数学PPT课件\《两位数加一位数、整十数》人教版小学数学一年级下册PPT课件（第6.2课时）.pptx,总页数=24
正在处理第 29/2048 个文件：D:\\PPT\课件\人教版数学PPT课件\人教版一年级下册数学PPT课件\《两位数加一位数、整十数（进位加）》人教版小学数学一年级下册PPT课件（第6.3课时）.pptx
file=D:\\PPT\课件\人教版数学PPT课件\人教版一年级下册数学PPT课件\《两位数加一位数、整十数（进位加）》人教版小学数学一年级下册PPT课件（第6.3课时）.pptx,总页数=22
正在处理第 30/2048 个文件：D:\\PPT\课件\人教版数学PPT课件\人教版一年级下册数学PPT课件\《十几减7、6》人教版小学数学一年级下册PPT课件（第2.3课时）.pptx
file=D:\\PPT\课件\人教版数学PPT课件\人教版一年级下册数学PPT课件\《十几减7、6》人教版小学数学一年级下册PPT课件（第2.3课时）.pptx,总页数=25
正在处理第 31/2048 个文件：D:\\PPT\课件\人教版数学PPT课件\人教版一年级下册数学PPT课件\《十几减8》人教版小学数学一年级下册PPT课件（第2.2课时）.pptx
file=D:\\PPT\课件\人教版数学PPT课件\人教版一年级下册数学PPT课件\《十几减8》人教版小学数学一年级下册PPT课件（第2.2课时）.pptx,总页数=23
正在处理第 32/2048 个文件：D:\\PPT\课件\人教版数学PPT课件\人教版一年级下册数学PPT课件\《多一些、少一些、多得多、少得多》人教版小学数学一年级下册PPT课件（第4.5课时）.pptx
file=D:\\PPT\课件\人教版数学PPT课件\人教版一年级下册数学PPT课件\《多一些、少一些、多得多、少得多》人教版小学数学一年级下册PPT课件（第4.5课时）.pptx,总页数=25
正在处理第 33/2048 个文件：D:\\PPT\课件\人教版数学PPT课件\人教版一年级下册数学PPT课件\《摆一摆，想一想》人教版小学数学一年级下册PPT课件（第4.8课时）.pptx
file=D:\\PPT\课件\人教版数学PPT课件\人教版一年级下册数学PPT课件\《摆一摆，想一想》人教版小学数学一年级下册PPT课件（第4.8课时）.pptx,总页数=19
正在处理第 34/2048 个文件：D:\\PPT\课件\人教版数学PPT课件\人教版一年级下册数学PPT课件\《数的顺序》人教版小学数学一年级下册PPT课件（第4.3课时）.pptx
file=D:\\PPT\课件\人教版数学PPT课件\人教版一年级下册数学PPT课件\《数的顺序》人教版小学数学一年级下册PPT课件（第4.3课时）.pptx,总页数=29

今日美图