• 清除空文本的小工具

    日期:2008-04-23 | 分类:VBA

    版权声明:转载时请以超链接形式标明文章原始出处和作者信息及本声明
    http://www.blogbus.com/pptdesign-logs/19636827.html

    自己做的小工具,用的还挺顺手,提供下载。

    ====================================================================
    本加载项是参考有关资料编写,供有需要使用
    ====================================================================
    背景:
    做完PPT后,有时候会在页面上留下很多空的文本框,一般我们会全部检查一次,
    原始的方法是页面全选,然后一个个检查,非常麻烦。有了这个小工具,可以瞬间
    一次性清除所有PPT上空的文本框。

    一.临时使用安装:
    1.解压下载的文件。
    1.打开需要修改的PPT,将安全设置中宏的安全性设置为中。
    2.双击解压后的文件CleanText.ppa
    3.在弹出的安全警告中选运行宏。
    4.在菜单“工具”中会多出一条菜单“清除空文本”,执行该菜单。
    5.按对话框确定,瞬间清除所有空文本框。
    6.临时使用安装当PPT关闭的时候自动卸载,下次使用仍需安装。

    二.永久使用安装
    1.解压下载的文件。
    2.将解压后的CleanText.ppa文件复制。
    3.打开任意ppt文件
    4.选“工具”--“加载项”,在对话框中选“添加”
    5.在打开的文件选择中的空白处按“粘帖”将刚才复制的CleanText.ppa添加到该目录。
    选择该文件,按确定。
    6.在弹出的安全警告中选运行宏。
    7.在菜单“工具”中会多出一条菜单“清除空文本”,执行该菜单。
    8.按对话框确定,瞬间清除所有空文本框。
    9.永久使用安装使用时候无需安装。

    =============================================================
    以上在office2003中调试通过,2007没有测试,欢迎大家反馈,以便改进。
    下载
    分享到:

    评论

  • 很惭愧现在才看到您的博客,一下午就停留在这里,从第一篇文章看起刚看到这里,准备试一下这个工具
  • 专门申请了个账号来顶
  • 楼主能不能把“将命令放到菜单栏”的代码共享一下啊
    我的qq:1003723172

    楼主能不能留一个
  • 临时使用安装的,就可以做到。没什么问题
    小女子正在学习当中。。多多指教,不胜感激
  • 博主。。我的是2003的,但是我的工具下只有加载宏,没有加载项,用加载宏继续下面的步骤后,可以粘贴扶植目录,但不会弹出安全警告,确定后工具上也没有多出“清楚空文本”的菜单。。
    希望大家帮忙解决下。。小女子不胜感激。。
  • 永久版本在2007下可以使用,选择PPT选项-->加载项-->最下面的管理-->PPT加载项,点击“转到”,然后添加,将ppa文件复制进去,再选定添加后就可以了。
  • lz真的太人才了。。。。这个也精通
  • 真是非常实用的工具。偷懒了~~~
  • 2007我试了,临时版本的可以使用。但永久版本的我不知道2007的“在打开的文件选择中的空白处按“粘帖”将刚才复制的CleanText.ppa添加到该目录。”怎么才能出现呢?