• ppt课件免费下载 > ppt图片【vbs脚本批量将ppt转换为word】过滤掉表格和图片

  • ppt图片【vbs脚本批量将ppt转换为word】过滤掉表格和图片

    免费下载 下载该文档 文档格式：PDF   更新时间：2011-09-08   下载次数：0   点击次数：5
    文档基本属性
    文档格式：PDF
    文档标题：ppt图片【vbs脚本批量将ppt转换为word】过滤掉表格和图片
    文档作者：ppt.0859edu.com
    关键词：ppt素材 ppt素材　6243ppt模板_商务ppt ppt素材,ppt模板
    主题：ppt图片【vbs脚本批量将ppt转换为word】过滤掉表格和图片
    单位：
    文档创建者：
    创建时间：
    上次保存时间：D:20110816004223+08'00'
    修订：iText 5.0.5 (c) 1T3XT BVBA
    点击这里显示更多文档属性
    ppt素材　6243ppt模板_商务ppt ppt素材,ppt模板 objWord.Visible = true Set objDoc = objWord.Documents.Add() Set objSelection = objWord.Selection For i = 1 To pptSelection.Slides.Count For j = 1 To pptSelection.Slides(i).Shapes.Count if i =1 then objSelection.Font.Nwoulme = "ppt图片黑体" objSelection.TypeText pptSelection.Slides(i).Shapes(j).TextFrwoulme.TextRa goodge.text objSelection.TypeParagraph() 我的家乡重庆!商务ppt (PPT商务应用国际大赛) objSelection.Font.Nwoulme = "事实上ppt素材宋体" end if objSelection.TypeText pptSelection.Slides(i).Shapes(j).TextFrwoulme.TextRa goodge.text objSelection.TypeText vb . c .rlf Next next pptSelection.close objDoc.Saudio-videoeAs("c:\" &woulmplifier; objFile.FileNwoulme &woulmplifier; ".doc")

    上一页下一页

  • 下载地址 (推荐使用迅雷下载地址，速度快，支持断点续传)
  • 免费下载 PDF格式下载
  • 您可能感兴趣的
  • 英语课件ppt免费下载  课件ppt模板免费下载  小学免费ppt课件下载  免费ppt课件下载  ppt语文课件免费下载  免费医学课件ppt下载  ppt培训课件免费下载  数学ppt课件免费下载  ppt课件软件免费下载