ppt的vba编程

❶ ppt里面的VBA怎么使用，有没有小例子。

下面是一个例子，来自网络：

下面代码是把第二张幻灯片的标题设置为第一张幻灯片的文件框的内容
ActivePresentation.Slides(2).Shapes(1).TextFrame.TextRange.Text=ActivePresentation.Slides(1).Shapes(3).TextFrame.TextRange.Text
下面代码是显示第一张幻灯片中所有文本框的内容，你看着哪个对你有用，用哪个吧
PrivateSubCommandButton1_Click()
DimiAsInteger
WithActivePresentation.Slides(1)
Fori=1To.Shapes.Count
If.Shapes(i).Type=msoTextBoxThen
MsgBox.Shapes(i).TextFrame.TextRange.Text
EndIf
Next
EndWith
EndSub

❷ 求教 请问在PPT中能否通过在VBA里写宏实现切换到某页幻灯片时，自动播放受触发器控制的动画

做了个演示文稿，中间做了一张幻灯片，用来播放一段电影。这个电影需要在好几个幻灯片中都要展示引用，又不想多做几张这个电影的幻灯片，就开始想能不能用这个一张幻灯片来解决所有问题呢？如果用ppt中默认的几种超级链接方式，都达不到预定的效果，那就是电影播放后，点一下这张幻灯片上唯一的一个按钮必须返回刚才的幻灯片。我也看到了，很多人在设计时，为了解决这个问题，在有电影的幻灯片下，竟然设置了多个按钮，以返回不同的上一个幻灯片。我通过研究，终于发现，用vba可以轻松解决这个问题，即使是50张幻灯片都来引用也没有问题。
放上制作好的图片：
[转载]巧用vba在ppt中灵活切换幻灯片X
步骤：1.制作好，多次引用的那张幻灯片。（我的是放电影的那张，就是第13张幻灯片）记住这张幻灯片的序号，在普通视图下看，即上图左边图圈1那部分序号。
2.利用控件箱，在这张幻灯片上放一个按钮，双击这个按钮，进入vba代码编辑窗口，把下面这段代码粘入其中：
Private Sub CommandButton1_Click()
SlideShowWindows(1).View.GotoSlide m
End Sub
也就是上图中的3部分。这段代码的意思就是单击按钮时，切换到第m张幻灯片。m的值在其他引用的按钮中设置。
3.通过控件箱，分别在另外几张你需要引用这个电影的幻 灯片上，插入按钮。并双击按钮进入vba代码编辑窗口，给每个按钮分别写入代码。当然你可以把下面的代码粘入即可。
Private Sub CommandButton1_Click()
SlideShowWindows(1).View.GotoSlide 13
m = 5
End Sub
这段代码的意思就是单击按钮时，切换到第13张幻灯片，同时m设置为5。第13张幻灯片就是我的有电影的那张。
在每个按钮的代码中，你需要改变的只是m后的数字。如何改动呢?很容易，这个按钮在第几张幻灯片上，这个数字就设置为几（这个数字在普通视图下很容易看到，如圈1中的数字）。目的是让放置电影的那个多次引用的幻灯片，一会能通过这个数字返回来。
另一个按钮的代码：
Private Sub CommandButton1_Click()
SlideShowWindows(1).View.GotoSlide 13
m = 8
End Sub
4.插入一个类模块，在里面声明一个公共变量m，可以在各段代码中引用这个变量。
即上图中标6的地方。
你可以把下面这段代码复制使用。
Public m As Integer
好了，下面你就可以放映你的演示文稿了，尽情切换吧！好爽！哦，对了，为了不影响最后的美观，你可以把这个公共引用的幻灯片设置为隐藏。

当然，如果你不想用vba来操作，也可以在多次引用的这张幻灯片上，放一个图形，然后通过“动作”设置，来链接到“最近的幻灯片”上，就可以了。做了个演示文稿，中间做了一张幻灯片，用来播放一段电影。这个电影需要在好几个幻灯片中都要展示引用，又不想多做几张这个电影的幻灯片，就开始想能不能用这个一张幻灯片来解决所有问题呢？如果用ppt中默认的几种超级链接方式，都达不到预定的效果，那就是电影播放后，点一下这张幻灯片上唯一的一个按钮必须返回刚才的幻灯片。我也看到了，很多人在设计时，为了解决这个问题，在有电影的幻灯片下，竟然设置了多个按钮，以返回不同的上一个幻灯片。我通过研究，终于发现，用vba可以轻松解决这个问题，即使是50张幻灯片都来引用也没有问题。
放上制作好的图片：
[转载]巧用vba在ppt中灵活切换幻灯片X
步骤：1.制作好，多次引用的那张幻灯片。（我的是放电影的那张，就是第13张幻灯片）记住这张幻灯片的序号，在普通视图下看，即上图左边图圈1那部分序号。
2.利用控件箱，在这张幻灯片上放一个按钮，双击这个按钮，进入vba代码编辑窗口，把下面这段代码粘入其中：
Private Sub CommandButton1_Click()
SlideShowWindows(1).View.GotoSlide m
End Sub
也就是上图中的3部分。这段代码的意思就是单击按钮时，切换到第m张幻灯片。m的值在其他引用的按钮中设置。
3.通过控件箱，分别在另外几张你需要引用这个电影的幻 灯片上，插入按钮。并双击按钮进入vba代码编辑窗口，给每个按钮分别写入代码。当然你可以把下面的代码粘入即可。
Private Sub CommandButton1_Click()
SlideShowWindows(1).View.GotoSlide 13
m = 5
End Sub
这段代码的意思就是单击按钮时，切换到第13张幻灯片，同时m设置为5。第13张幻灯片就是我的有电影的那张。
在每个按钮的代码中，你需要改变的只是m后的数字。如何改动呢?很容易，这个按钮在第几张幻灯片上，这个数字就设置为几（这个数字在普通视图下很容易看到，如圈1中的数字）。目的是让放置电影的那个多次引用的幻灯片，一会能通过这个数字返回来。
另一个按钮的代码：
Private Sub CommandButton1_Click()
SlideShowWindows(1).View.GotoSlide 13
m = 8
End Sub
4.插入一个类模块，在里面声明一个公共变量m，可以在各段代码中引用这个变量。
即上图中标6的地方。
你可以把下面这段代码复制使用。
Public m As Integer
好了，下面你就可以放映你的演示文稿了，尽情切换吧！好爽！哦，对了，为了不影响最后的美观，你可以把这个公共引用的幻灯片设置为隐藏。

当然，如果你不想用vba来操作，也可以在多次引用的这张幻灯片上，放一个图形，然后通过“动作”设置，来链接到“最近的幻灯片”上，就可以了。
VBA是非常流行的应用程序开发语言VISUAL BASIC的子集。在ppt中想要实现编程效果,我们可以使用vba实现。那么具体怎么操作呢?下面就是PPT使用VBA代码编程的教程，一起了解一下。

1、打开ppt，在上面的工具栏中找到【开发工具】并点击。

PPT使用VBA代码编程的教程 PPT使用VBA代码编程的方法

2、点击过后就可以看到VBA命令按钮了。(如图)

PPT使用VBA代码编程的教程 PPT使用VBA代码编程的方法

3、点击VBA命令按钮，会弹出一个窗口。(如图)

PPT使用VBA代码编程的教程 PPT使用VBA代码编程的方法

4、单击【演示文稿】找到【插入】中的【用户窗体】并点击，在这里就可以加入各种类型了。

PPT使用VBA代码编程的教程 PPT使用VBA代码编程的方法

5、完成后，我们就可以找到工具栏中的“||”图标进行运行测试。

PPT使用VBA代码编程的教程 PPT使用VBA代码编程的方法

6、测试过后，我们就可以在工具栏中找到各种命令了。

PPT使用VBA代码编程的教程 PPT使用VBA代码编程的方法

上面就是PPT使用VBA代码编程的教程

❸ pptvba插入公式

pptvba插入公式：点击“开发工具”中的“Visual Basic”，PPT中的代码一般要放到模块里，点击右键，插入模块。

工具／原料：

联想hinkBook 14-llL

Windows10

Microsoft PowerPoint 2016

1、首先，打开或者新建一个PPT，如下图所示。

❹ 如何用vba做ppt

• 首先，新建一个PPT文档，并复制这段代码。点击“开发工具”→Visual Basic或查看代码

  Sub一键EMF()

  ActiveWindow.View.PasteSpecial (ppPasteEnhancedMetafile)

  ActiveWindow.Selection.ShapeRange.Ungroup.Ungroup.Select

  ActiveWindow.Selection.ShapeRange(msoAutoShape).Delete

  ActiveWindow.Selection.ShapeRange.Regroup

  End Sub

• 如果没有开发工具选项卡，请点击文件→选项→自定义功能区→主选项卡→勾选“开发工具”→确定。然后根据第一步继续。如果已经有开发工具选项卡，跳过此步。

• 进入VBA界面后，点击插入→模块→在新建的空白区域按Ctrl+V粘贴复制好的代码→关闭窗口，返回PPT界面。

  

• 我们也可以把宏放到快速访问工具栏中，方法是：文件→选项→“从下列位置选择命令”下面选择“宏”→将一键EMF添加到对话框右侧的快速访问工具栏里。此时宏就出现在了快速访问工具栏上。复制素材后点击此按钮，就做到了一键导入。经常从AI往PPT导素材的朋友，不妨试试。

  PS：

  1.建议将做好的宏处理文档单独保存为pptm格式，使用时打开导入素材，然后把处理后的素材再复制到需要的ppt里，此pptm只作为中转。

  2.使用一键前，请注意先复制元素，否则VBA会报错。

  3.代码在PPT2010、2013中测试无误。

❺ 一个PPT中放入多张带VBA编程的PPT，保存后VBA不可用

启用宏的 PowerPoint 演示文稿 文件扩展名为 .pptm、可以包含 VBA 代码的演示文稿。 启用宏的 PowerPoint 放映 文件扩展名为 .ppsm、包含预先核准的宏的演示文稿，您可以从演示文稿运行宏。 PowerPoint 启用宏的模板 文件扩展名为 .potm、包含预先核准的宏的模板，您可以将宏添加到模板中，并在演示文稿中使用。 直接保存成PPT或PPTX是不保存宏的，我以前也碰到过的

❻ 如何在PPT中写一个VBA 使得播放时每一个slide里添加一个label【PPT2010】

感觉label应该是在slide设计时添加、设定
ppt中的vba只是用来控制跳转、播放顺序、选择性链入图片和文字等有意义
其他只是花里胡哨的东西
当然对label的内容进行vba编程控制或许有一定意义
因为ppt只是用来显示你要说的内容
在演示之前这些内容就应该已经确定了
只是播放顺序、前进、回跳加一些控制会显得简单
而不是刷刷刷的来回转滚轮或啪啪啪地敲键盘
（个人体会，小家之见）

❼ ppt vba编程 要求：在演示文稿中，创建新幻灯片，收集选定幻灯片的标题，并链接到相应的幻灯片

比较麻烦。看软件使用说明就星了

❽ 在PPT中vba编程有什么用

难得的PPT的VBA编程资料哟！要一起选中解压。

❾ 如何用VBA 编程实现PPT中图表与EXCEL中

想让PPT动起来，OTPUB认为只需要两步：第一步通过Excel设计并制作数据动态图表的原型；第二步将Excel中制作好的动态图表嵌套到PPT中，并在发表过程中以Excel为“遥控器”，让PPT中的图表实现动态展现效果。

❿ 用宏自动调整格式，如何编写PPT的VBA

你好！做PPT的原则是一张PPT不要放太多的内容，所以在一张上放的对象应该不会太多~这样的话还是建议手动调整一下，你要设置＂根据占位符自动调整文本＂还得考...