在PowerPoint中,您可以通过编程来实现单击时按顺序显示内容的效果。下面是详细的步骤和相应的源代码示例,帮助您完成这个任务。
步骤1: 打开Visual Basic编辑器
首先,打开您的演示文稿,并按下Alt + F11组合键,在PowerPoint中打开Visual Basic编辑器。
步骤2: 插入模块
在Visual Basic编辑器中,选择“插入”菜单,然后选择“模块”。这将在项目资源管理器中创建一个新的模块。
步骤3: 添加VBA代码
在新创建的模块中,粘贴以下VBA代码:
Sub OnSlideClick()
Dim slide As Slide
Dim shape As Shape
Dim i As Integer
Set slide = ActiveWindow.View.Slide
i = 1
For Each shape In slide.Shapes
If shape.Type = msoPlaceholder Then
If shape.PlaceholderFormat.ContainedType = msoContentText Then
If i = 1 Then
shape.Visible = msoTrue
Else
shape.Visible = msoFalse
End If
i = i + 1
End If
End If
Next shape
End Sub