正在阅读:巧用Office中的宏让十步并着一步走巧用Office中的宏让十步并着一步走

2008-05-21 09:44 出处:其它网站 作者:cfan.com.cn 责任编辑:xuwei2

  在Word中打开一个文件,一般要经过多个步骤:首先要执行“文件→打开”菜单命令(或单击“打开”按钮),在弹出的打开对话框中,接着再选择目录、选中文件、单击“打开”按钮等。而如果将这个过程记录成宏的话,以后只要单击一次宏按钮,即可自动完成以上所有的步骤。当然这只是一个极端的例子,下面我们再来看看两个实用性非常强的“宏”实例,一定能大大提高我们的工作效率的。

  实例1:1秒钟在PPT里插入100张图片

  如果要插入几十甚至几百张图片,并且要求每张图片插入到每张幻灯片页面上(即有几张照片就要有几张幻灯片)你会怎么做?按照常用的方法点击“插入→图片→来自文件”菜单命令,然后一个一个选择需要的图片,或者点击“格式→背景”命令,将图片作为PowerPoint的背景导入,这样也太浪费时间了。在这种情况下,可以借助PowerPoint强大的宏功能,将多步操作合并为一步,批量插入图片。

  第一步:首先准备好图片,假设在C盘下面的Pictures文件夹内有60张jpg格式的图片,如“C:\Pictures\1.jpg”、“C:\Pictures\2.jpg”、“C:\Pictures\3.jpg”等,文件名是有序的数字。

  第二步:启动PowerPoint 2003,按下Alt+F11键打开Visual Basic编辑器窗口,点击“插入→模块”菜单命令,在弹出的代码编辑窗口中输入以下代码:

  Sub InsertPic()

  Dim i As Integer

  For i = 1 To ActivePresentation.Slides.Count

  ActivePresentation.Slides(i).Select

  With ActiveWindow.Selection.SlideRange

  .FollowMasterBackground = msoFalse

  .Background.Fill.UserPicture "C:\Pictures\" & i & ".jpg"

  End With

  Next

  End Sub

  第三步:关闭Visual Basic编辑器窗口,上面的模块代码会自动保存。此时,连续按Ctrl+M键建立与图片数目相等(如:60)的多个空白幻灯片。按Alt+F8键打开宏对话框,选中我们上面建立的InsertPic宏,点击“运行”即可,60张图片很快就自动插入到幻灯片中了。

  实例2:为Word添一本随手就查的百科全书

  因特网就像是一本大百科全书,里面的资料应有尽有。所以我在使用Word编辑文档时,随时要从网上搜索一些资料,只是每次还要先打开IE再输入搜索引擎网址才能完成搜索,非常麻烦。其实可以在Word中直接启动IE,并自动打开搜索引擎主页,用起来很方便。

  第一步:启动Word 2003,按下Alt+F8组合键打开“宏”窗口。在“宏名”中输入搜索引擎的名称,如“Baidu”(这里以添加百度为例,其他搜索引擎的建立方式与此类似),然后单击“创建”按钮,打开Visual Basic编辑器。

  第二步:在“Sub Baidu()”与“End Sub”之间输入如下代码:

  shell"C:\Program Files\Internet Explorer\iexplore.exe http://www.baidu.com"

  1所示,单击工具栏上的“保存”按钮,将代码保存在“通用”模板中。

img200708090915550

图1 编辑宏

  第三步:关闭Visual Basic编辑器返回Word主界面,点击“工具→自定义”菜单命令,打开“自定义”窗口,切换到“命令”选项卡,然后在“类别”中选择“宏”,并在右侧“命令”中选择“Nomail.NewMacros.Baidu”(见图2),并把它拖放到工具栏适当的位置,在工具栏上右击按钮,选择“命名”,给该按钮起一个名字,如:“百度搜索”,完成之后关闭“自定义”窗口。

img200708090916110

图2 保存宏

  第四步:当需要在网上搜索资料时,只要单击工具栏上的“百度搜索”按钮,就会自动打开IE并出现百度的搜索页面了。

关注我们

最新资讯离线随时看 聊天吐槽赢奖品