powerpoint宏与vb实用教程

powerpoint宏与vb实用教程

ID:11925025

大小:15.97 KB

页数:19页

时间:2018-07-14

powerpoint宏与vb实用教程_第1页
powerpoint宏与vb实用教程_第2页
powerpoint宏与vb实用教程_第3页
powerpoint宏与vb实用教程_第4页
powerpoint宏与vb实用教程_第5页
资源描述:

《powerpoint宏与vb实用教程》由会员上传分享,免费在线阅读,更多相关内容在教育资源-天天文库

1、PowerPoint宏与VB实用教程在本系列教程中我们来学习一个让我们事半功倍的Powerpoint2000的功能,那就是“宏”程序,(如果适时在Powerpoint中使用“宏”将大大提高您的工作效率,而且可以制作出很多Powerpoint固定命令无法实现的功能!)好点击菜单“工具”—“宏”,这时Powerpoint将弹出一个快捷菜单,如图(1)所示,在这里你可以看到一条命令“宏”,好我们点击它(快捷键“ALT+F8”),这时会弹出一个如图(2)所示的名为:“宏”的对话框,在这里可以看到这个对话框中有一个名为:“myfirst”这样一个宏程

2、序名,其实在这里可以放置很多的“宏”程序,(宏程序就是VBA程序,英文全称是:“VisualBasicforApplication”,即面向于应用程序的VB。),每个“宏”程序分别执行不同的自定义命令,“宏名”包含选择宏的名称,“宏框”中列出工程中的所有可用宏;“运行”按钮运行选择的宏;“取消”按钮就是关闭“宏”对话框;“跟踪”按钮就是逐行执行“myfirst”代码(然后使用功能键“F8”一行一行执行,如果你不想一步一步的执行,也可以按“F5”键从当前行执行到该宏程序的最后。);“编辑”按钮就是打开代码窗口,并可看见选择的“myfirst”

3、这段“宏”程序,之后我们就可以修改这个“宏”了;“创建”按钮在代码窗口中打开一个模块,以创建一个新的“宏”(提示:如果你在图(2)“宏名”对话框中输入一个新的名称如“MYSECOND”,那么图(2)中“创建”按钮才可以被激活,这时点击它将可以创建一个名为“MYSECOND”这样一个宏程序了。);“删除”按钮:从工程中删除选择的宏;而“宏作用于”下拉菜单是设定被选中“宏”程序的作用范围;而“说明”栏是对该宏的描述,例如我在图(2)中输入的让我记住“myfirst”这个宏完成什么工作,即一个运算乘法的“宏”。               图一 

4、            图二示例:  下面我们具体做一个宏程序,以便大家了解“宏”的制作过程,如图(2)所示的“宏名”中输入“myfirst”这个宏名,这时图(2)中的“创建”按钮被激活了,点击后你会看到VB编辑器,并产生如下面所示的深蓝色的代码:Submyfirst()宏由lz创建,日期00-9-4。EndSub  我们可以删掉“Submyfirst()”和“EndSub”中的这三行注释行,然后输入如下的VBA代码(深蓝色),之后点击功能键“F5”,即可得到一个如图(3)所示的输入对话框。 图(3)Submyfirst()Dimx,y声明

5、两个变体变量一个是X,一个是Yx=InputBox("请输入一个值","数值")在这里输入第一个乘数“24”,如图(3)点击“确定”按钮后执行到下一个InptuBox函数对话框。y=InputBox("再输入一个值","数值")在这里输入另一个乘数“35”x1=x*y让x和y相乘,并把相乘的值付给“X1”这个变量,本例中“X1”没有事先声明,乘号是以“*”表示的。MsgBox"你的值等于"&x&"×"&y&"="&x1,vbInformation,"你好"得到如图(4)所示的对话框。EndSub  在这个实例中我们学习了两个函数一个是“In

6、putBox”输入框,另一个是“MsgBox”信息框,而这里的“”单引号是个注释符。(注:我在“myfirst”这段代码中没有放置任何的错误自陷代码。)在“myfirst”代码中的“&”符是链接符,它可以将变量和字符串联接起来。 图(4)  其实我们将这个“宏”程序稍加修改,就可以将这个乘法的最后得值输入到一个Powerpoint文稿中的文本框里,但是首先你必须知道这个文本框的名字,如果这个文本框的名称是“TextBox20”,那么我们就可以在这里输入另一些代码了。Submysecond()x=InputBox("请输入一个值","数值")

7、y=InputBox("再输入一个值","数值")x1=x*yActiveWindow.Selection.SlideRange.Shapes("TextBox20").Select首先选定这个名为“TextBox20”的文本框。ActiveWindow.Selection.TextRange.Text="得值:"&x1  将被选定的文本框的值定为:“得值:”字符串和“X1”这个变量值。如果将X值输入了“5”,而将另一个Y值输入了“3”,那么最后的结果是:在Powerpoint文稿中的“TextBox20”,得到的值为:“得值:15”。En

8、dSub  注意:以上所有的蓝色部分都是注释行。注释行有两种方法:在要注释的行的行首输入“”或“rem”。  通过以上实例大家可以基本上了解到“宏”就是将经常运行的工作自动化。如

当前文档最多预览五页,下载文档查看全文

此文档下载收益归作者所有

当前文档最多预览五页,下载文档查看全文
温馨提示:
1. 部分包含数学公式或PPT动画的文件,查看预览时可能会显示错乱或异常,文件下载后无此问题,请放心下载。
2. 本文档由用户上传,版权归属用户,天天文库负责整理代发布。如果您对本文档版权有争议请及时联系客服。
3. 下载前请仔细阅读文档内容,确认文档内容符合您的需求后进行下载,若出现内容与标题不符可向本站投诉处理。
4. 下载文档时可能由于网络波动等原因无法下载或下载错误,付费完成后未能成功下载的用户请联系客服处理。