スライド処理モジュール

スライドの一括画像変換

self_slide_img.py

「ppt_dir」に保存されているpptxファイル（複数）を一括して、jpg、もしくは、png形式の画像に変換します。変換後の画像ファイルのファイル名は、変換前のpptxファイルのファイル名にスライド番号を付記したものになります。

  1. import win32com.client

  2. import os

  3. import glob

  4. from comtypes import client


  6. ppt_dir=r'C:\Users\******\Documents\python\ppt'

  7. img_dir = r'C:\Users\******\Documents\python\image'


  9. def export_img(f, img_dir, f_type):

  10. ppt_ap = win32com.client.DispatchEx("Powerpoint.Application")

  11. ppt_ap_open = ppt_ap.Presentations.open(f)

  12. ppt_ap_open.Export(img_dir, FilterName=f_type)

  13. ppt_ap_open .close()

  14. ppt_ap.quit()

  16. if __name__ == '__main__':

  17. ppt_path=ppt_dir+r'\*.pptx'

  18. files = glob.glob(ppt_path)

  19. for f in files:

  20. st_fname=f.replace(ppt_dir,'').replace('.pptx','').replace(chr(92),'')

  21. #\の削除

  22. print(st_fname,'の処理を開始します。')

  23. export_img(f, img_dir, 'png') #'jpg'


  25. img_path=img_dir+"\*.png" #'jpg'

  26. img_files = glob.glob(img_path)


  28. for fi in img_files:

  29. print(len(fi))

  30. if len(fi)==47:

  31. #スライド数が１０枚以上の時の処理

  32. #４７：スライド数が１桁（環境により数値が変わります）

  33. #不要な場合は、if分を削除します

  34. os.rename(fi,fi.replace('スライド',st_fname+'_0'))

  35. else:

  36. os.rename(fi,fi.replace('スライド',st_fname+'_'))

  38. print(f,'の処理を終了しました。')

スライドから抽出したテキストのcsvへの書き出し

self_slide_txt.py

「ppt_dir」に保存されているpptxファイル（複数）のスライドに記入されているテキスト分を抽出して、csvファイルに書き出します。csvファイル(report.csv)の１列目には、pptファイルのファイル名、２列目にはテキストが書き出されます。書き出されたテキストを機械学習の対象とすることができます。

  1. import pptx

  2. import glob

  3. import csv


  5. ppt_dir=r'C:\Users\******\Documents\python\ppt'

  6. ppt_path=ppt_dir+r'\*.pptx'


  8. if __name__ == '__main__':

  9. files = glob.glob(ppt_path)

  10. alltext=[]


  12. for k in range(len(files)):

  13. ppt=pptx.Presentation(files[k])

  14. reportname=files[k]

  15. alltextline=""

  16. for i,slide in enumerate(ppt.slides):

  17. for k in slide.shapes:

  18. if not k.has_text_frame:

  19. continue

  20. for L in k.text_frame.paragraphs:

  21. alltextline+=L.text

  22. kobetureport=[]

  23. kobetureport.append(reportname.replace(ppt_dir,"").replace(chr(92),''))#個別のファイル名

  24. kobetureport.append(alltextline)#そのファイルの中身

  25. alltext.append(kobetureport)


  27. with open(ppt_dir+'/report.csv', 'w', encoding='CP932', errors='ignore',newline="") as f:

  28. writer=csv.writer(f)

  29. writer.writerows(alltext)


北海道医療大学・情報センター