解决问题：

1、如何启用开发工具箱

2、如何编写宏 

案例：AgeCalc 计算年龄

Sub AgeCalc( )

 ‘variable declaration （变量声明）

             Dim FullName As String

             Dim DateOfBirth As Date

             Dim Age As Integer

             'assign values to variables （赋值给变量）

             FullName = "John Smith"

             DateOfBirth = #01/03/1967#

             'calculate age （计算年龄）

             Age = Year(Now())-Year(DateOfBirth)

          'print results to the Immediate window （在立即窗口里打印结果)在这里为了更好观察结果，使用msgbox输出信息

MsgBox (FullName & " is " & Age & " years old.")

End Sub

3、如何运行宏

常用VBA语句

 ActivePresentation.SlideShowWindow.View.State = ppSlideShowPaused

语句解释：‘

练习材料下载：

附：

VBA 是一种附着于office的一种自动化语言,它可以使常用的操作过程自动化,可以创建自定义的解决方案.

帮助文档：

https://docs.microsoft.com/zh-cn/office/vba/api/overview/powerpoint