ppt在哪里打开?如何将ppt转为文件

分享一个用Access打开PPT演示文档的示例。

一、问题描述:

能使用ACCESS打开PPT演示文档吗?如何操作?

二、解决方法:

使用Application 对象(PowerPoint),即可解决。具体代码如下:

使用通用函数:

Function OpenPPT(sFile As String, Optional bRunAsSlideShow As Boolean)

'Designed by Daniel PineaultDim oPPT As ObjectOn Error Resume NextSet oPPT = GetObject("PowerPoint.Application")If Err.Number <> 0 ThenErr.ClearSet oPPT = CreateObject("PowerPoint.Application")End IfOn Error GoTo Error_HandleroPPT.Visible = TrueoPPT.Presentations.Open (sFile) '打开对应的PPT演示文档If bRunAsSlideShow ThenoPPT.ActivePresentation.SlideShowSettings.RunError_Handler_Exit:On Error Resume NextSet oPPT = NothingExit FunctionError_Handler:MsgBox "The following error has occurred." & vbCrLf & vbCrLf & _"Error Number: " & Err.Number & vbCrLf & _"Error Source: OpenPPT" & vbCrLf & _"Error Description: " & Err.Description, _vbCritical, "An Error has Occurred!"Resume Error_Handler_ExitEnd Function

或者直接打开:

Private Sub Command0_Click()Dim oPPT As ObjectSet oPPT = CreateObject("PowerPoint.Application")oPPT.Visible = TrueoPPT.Presentations.Open "C:\Users\ZhiQiang.Li\Desktop\Arduino\程序设计基础PPT\IO口的高级应用.pptx"End Sub

三、演 示:

ppt在哪里打开?如何将ppt转为文件-1

原创文章,作者:发布专员,如若转载,请注明出处:https://ziliaobaba.com/32983.html

(0)
发布专员发布专员
上一篇 2022年12月6日 18:15
下一篇 2022年12月6日 18:18

相关推荐

  • 玻璃破了怎么修补?玻璃修补

    汽车玻璃是一种双层胶合玻璃,受到外力的撞击时,如果力道不足以让它破碎而只产生裂痕,中间的胶合层就会因空气进入和大气压力的作用而分离,如果继续行驶,裂缝面积会越来越大,影响视线及行车安全。这时,如果去做…

    2022年11月13日
  • 女生开什么店成本低利润高

    女生开什么店成本低利润高 随着经济的发展,越来越多的女性开始创业,但是很多女性创业者在选择创业方向时,往往会犹豫不决,不知道开什么店成本低利润高。其实,女性创业者可以选择一些低成本、高利润的店铺,以获…

    投稿 2023年7月17日
  • 考驾照流程(自己报考驾照流程)

    年龄: 1、申请小型汽车、小型自动挡汽车、残疾人专用小型自动挡载客汽车、轻便摩托车准驾车型的,在18周岁以上、70周岁以下; 2、申请低速载货汽车、三轮汽车、普通三轮摩托车、普通二轮摩托车或者轮式自行机械车准…

    投稿 2022年11月30日
  • 天津高铁站在哪个区

    ## 一、天津高铁站位置 天津高铁站位于天津市河西区,是中国首座跨海高铁站,也是中国第一座高铁站。天津高铁站位于河西区,是河西区的核心交通枢纽,也是天津市的重要交通枢纽之一。 ## 二、天津高铁站的交通状况 …

    投稿 2023年8月17日
  • 为什么黄金会一路狂飙到3400?探究背后的市场逻辑与驱动因素

    近年来,国际黄金价格一路攀升,屡创新高,甚至突破了3400美元的历史高位,引发全球投资者的强烈关注。那么,为什么黄金会一路狂飙到3400美元?黄金价格的大幅上涨背后,是多重经济和市场因素交织作用的结果。本文将…

    2025年4月22日
  • 电脑怎么设密码开机?如何设置电脑密码

    相信大家对于电脑都不陌生了,基本上家家户户都有了。但是在使用过程中很多新手小白或者对于相关设置不清楚的小伙伴们还是有一定问题的。 今天讨论的功能是:怎么设置电脑开机密码,也就是在电脑开启以后需要输入相…

    2022年12月26日
  • 冰雹是怎样形成的有什么危害?冰雹形成高度

    冰雹是夏秋季节常见的一种灾害性天气,我国大部分地区都受到过不同程度的冰雹灾害影响,尤其是农业生产,冰雹所经之处一片狼藉,大的冰雹甚至能破坏房屋、汽车,甚至人畜等出现伤亡! 一、结冰不是冬天才出现么?为…

    2022年12月12日
  • 骁龙8是什么处理器

    骁龙8:最新一代的高性能处理器 骁龙8是由美国芯片制造商高通公司推出的最新一代高性能处理器,它采用最新的7nm工艺制造,拥有更高的处理能力和更低的功耗。它是一款全新的处理器,可以满足当今智能手机的高性能要求…

    投稿 2023年7月1日
  • 怎么看内存颗粒(怎么看内存颗粒是单面还是双面)

    为什么要发这个文章呢?其实就是聊聊近期内存的事儿!粉丝团的大部分粉丝,依然觉得内存价格会继

    2022年1月2日
  • 熟人刷单骗局(网上刷到单骗局可以报警)

    罗娇封面新闻记者肖洋席秦岭见习记者周翼12月28日,封面新闻记者从德昌县公安局获悉,近日,德昌县公安局民警打掉一个推广赌博、诈骗平台团伙,破获一起帮助信息网络犯罪案。嫌疑人陈某网上刷单被骗后,主动加入诈骗推广团伙,以赚回被骗的钱。并通过扫码送毛绒玩具的方式,在德昌、西昌等地,推广“云鼎娱乐”等赌博APP及刷单诈骗信息。目前,相关嫌疑人已被采取刑事强制措施。据办案民警介绍,12月初,德昌县公安

    2022年1月5日