不容错过的精彩呈现：PPT中实现图片的毛玻璃动态遮罩效果展示-今日头条

说起毛玻璃效果，各位粉丝朋友可能都知道，无非是图像的磨砂玻璃效果，这可用PS等图像处理软件轻松处理。是的，但对于我们广大办公朋友而言，可能与很有一部份人除了用Office办公以外，估计多数人不擅长用图像软件处理图像方面的技能和技巧。例如，换一个寸照的背景照片，很多人都认为必须用PS软件或请教图像处理这方面的人士。事实上，我们有时候，如果要求不高的情况下，大可不必这样兴师动众或求教于人的，完全我们自己可以实现去处理的。例如我们刚才提及的存照背景更换问题，我们完全可以利用Office中的任何一款组件，比如PowerPoint就可以利用其删除背景功能很方便的处理。而我们今天要说的图像的“毛玻璃“效果，在我们的PPT中同样可以轻松完成，而且我们还能实现动态的毛玻璃展示甚至在PPT全屏放映状态下的拖放毛玻璃效果。

说到这里，各位粉丝是不是有些好奇呢？我在这里可以组责任地告诉各位，我们今天的动态毛玻璃效果肯定可以实现的。

好吧，那就跟着我一路带领大家看看我如何实现的吧（注意：要认真地看仔细咯，哈哈！）。

一、图像素材的准备

我们可以根据自己的喜好，自行自由准备你们的素材吧。在这里，我准备了自己的素材图像。如下图所示

图1 毛玻璃素材图像的准备

二、PPT放映状态下毛玻璃图像的动态设计与展示

(一)PPT编辑状态下图像的毛玻璃动态设计

1、打开PowerPoint365，新建一个空白文档，设置版式为空白版式。如下图所示

图2 新建一个空白版式的PPT演示文档幻灯片

2、在上面的幻灯片中插入一个用于交互的”按钮“，命名为”毛玻璃遮罩效果动态展示“，在插入一个荷花背景的原始图像。如下图所示

图3 空白版式幻灯片上插入的图像和按钮

3、再在Excel中插入一个矩形形状图形对象并在公式编辑栏中命名，然后复制粘贴到PPT中，设置其效果(无边框、无填充)，虽然之后看起来感觉什么都没有，但是点击将有6个顶点的图形句柄呈现。如下图所示

图4 插入一个矩形，待设置效果为无边框、无填充

4、趁上面矩形在选中的状态下，调出其图形设置的任务窗格(右侧可见)，设置其填充方式为图片或纹理，并勾选”将图片平铺为纹理“，即可。然后，再将该矩形左对齐幻灯片上刚才插入的图形并调整该矩形高度和图像一致。如下图所示

图5 ”毛玻璃“矩形框的设置效果

5、进入PPT后台：开发工具-->点击"Visual Basic"-->点击菜单”插入-->模块“。如下图所示

图6 进入PPT后台VBA环境

6、编辑毛玻璃动态效果展示的VBA代码：在右侧的模块1代码窗口输入代码即可。如下图所示

图7 毛玻璃动态效果展示的VBA代码

7、返回PPT幻灯片编辑前端，选中刚才的交互按钮<毛玻璃遮罩效果动态展示>，点击”插入“-->”链接“选项组中的”动作“-->在对话框”操作设置“中选择”运行宏“列表中的”Clouded_Glass_Effect_Show“-->最后点击”确定“按钮即可。如下图所示

图8 为交互按钮添加运行宏链接

(二)PPT放映状态下毛玻璃图像动态展示

1、按<F5>键，让演示文档处于放映状态(满屏)。如下图所示

图9 演示文档满屏放映

2、点击放映状态下按钮<毛玻璃遮罩效果动态展示>，可以看到如下图10、图11、图12 动态毛玻璃过度效果的展示。如下系列图所示

图10 毛玻璃动态展示过度1

图11 毛玻璃动态展示过度2

图12 毛玻璃动态展示过度3

3、当在动态毛玻璃展示过程中，按<Esc>键后，将停止图像的毛玻璃动态展示，并弹出对话框。如下图所示

图13 按<Esc>键结束图像的毛玻璃动态展示

以上，是关于在PPT中实现毛玻璃的动态效果的设计与展示，实际上，我们在VBA后台代码加进随机函数，可以让矩形区域每几毫秒随机在荷花图像上的不同位置呈现毛玻璃效果的。关于这一点，就留给各位粉丝朋友自行去实践吧。现在，我们不仅局限于这种动态的毛玻璃展示效果，而且我们还要给各位分享一个更好的效果，那就是在幻灯片全屏放映状态下，如何实现用鼠标拖动”毛玻璃“矩形框进而更好呈现在屏幕的任意位置展示图像框住的部分出现毛玻璃效果的问题。

这个想法和意义是较为深远的，因为从我们平常操作PPT来看，要在全屏放映状态下实施对PPT上的对象的拖放，几乎是不可能的，甚至有些天方夜谭。但事实上，我们今天将化腐朽为神奇，将一切不可能强行变为可能。

下面，我们将继续分享在PPT放映状态下如何交互拖放PPT上毛玻璃框实现图像的任意位置呈现毛玻璃效果的设计与操作体验。

三、PPT放映状态下拖放毛玻璃框实现图像任意位置毛玻璃效果的呈现设计与操作体验

(一)PPT放映状态下拖放毛玻璃框实现图像任意位置毛玻璃效果的呈现设计

1、同上面”一“一样，新建一个空白版式的幻灯片，设置其背景为图片”Windows10壁纸模糊效果.png“。如下图图14和图15 所示

图14 空白版式幻灯片模糊背景图片插入

图15 空白版式幻灯片模糊背景图片效果

2、再在上面的幻灯片上插入一个清晰的图片 ”Windows10壁纸原图.png“，调整其和幻灯片等大小并完全对齐地覆盖在原幻灯片上面。效果如下图所示

图16 另行再插入一个清晰的图片完整覆盖模糊图

3、最后，插入一个圆角矩形的现状图形对象作为”毛玻璃“框框，并设置其形状效果(有边框、棱台、填充为”幻灯片背景填充“)。如下图所示

图17 ”毛玻璃“框框的插入和设置效果

到这一步，我们已经初见拖动这个”毛玻璃“框框可以呈现图形任意位置的毛玻璃效果了。但是，我们要指出的是，我们此时是在幻灯片编辑状态下的拖动，这自然是没问题，要是我们在满屏放映状态下呢？这就可不一定了，所以要使得在放映状态下都能同样地实现拖动”毛玻璃“框框展现图像的任意位置的毛玻璃效果，还得我们从PPT后台的VBA代码着手。

4、同”一“一样，我们进入PPT的VBA后台。然后，输入下面截图的代码，保存即可。代码系列截图如下所示