首先，新建一张空白幻灯片，设置好所需要的背景色，选择“插入”选项卡，点击对象，在弹出窗口选择“新建”，在对象类型处选择“Microsoft Excel Chart”，确定；在弹出的Excel编辑窗口，点击数据窗口“Sheet1”，根据需要更改数据，删除不必要的，增加需要的数据，还可以是使用公式。比如，计划产量是50，A厂产量为计划产量*50%，B厂产量为计划产量减去A厂产量（图2）。再点击图表窗口“Chart”，根据需要设置图表类型，如柱形图，添加好数据标签。

接下来，选择“开发工具”选项卡，点击“Visual Basic”，在出现的VBA代码编辑窗口中输入如下代码（图4）。

TextBox2.Value = ScrollBar1.Value & "%"

Set wb = Me.Shapes(1).OLEFormat.Object

sh.Range("B2") = TextBox1.Value

最后，在保存幻灯片时，将类型设置为启用宏的演示文稿，扩展名为pptm。这样，当播放幻灯片时，拖动滚动条，文本框控件中的值、图表等就会产生相应的联动效果了。