|
|
楼主 |
发表于 2011-3-13 23:29
|
显示全部楼层
大家晚上好，我们现在上课
第二讲 录制宏 修改宏 保存宏 指定宏 自定义按钮 加载宏
补充的：
怎样删除个人宏工作薄？
答：个人宏保存在此路径下的文件夹里C:\Documents and Settings\Administrator\Application ，Data\Microsoft\Excel\XLSTART我们删除相应的文件 但要注意，如果操作系统不一样，可能有点差别
怎样把工作薄存为加载宏？
答：第一步：文件菜单，另存为，打开另存为对话框，找到保存类型为Microsoft Office Excel 加载宏（*.xla), 文件名为“佛山小老鼠” 确定
第二步：工具菜单，加载宏，打开加载宏对话框，勾起“佛山小老鼠“加载宏前面的勾，确定
第三步：Alt+F11,进入VBE编辑窗口，就可以看到“佛山小老鼠”这个加载宏，你也可以在里添加和修改代码
加载宏有什么好处？
答：一.可以保护VBA代码，呵呵，不过这种保护也是相对的，因为在EXCEL里VBE的工程代码很容易被破解，但可以限制不懂VBA的朋友去访问我们的代码和破坏我们写的代码
二.加载宏工作薄不显示,这样可以使初学都和普通工作薄混淆
三.我们把我们的代码放在加载宏工作薄里,可以方便在其它工作薄里使用,如自定义函数代码放在加载宏工作薄,那么在所能的工作薄里都能使用且不用受工作薄名称的限定,,呵呵,这样是不是很方便啊.
四.自由自在的加载加载宏工作薄. 方法:工具菜单，加载宏，打开加载宏对话框，勾起“某某加载宏“加载宏前面的勾，确定,这样就加载了这个宏,反之就取消那个加载宏 (备注,记得把宏的安全性设置为低")
怎样设置宏的安全性?
答:工具菜单,宏,安全性,安全性分为几种,不过建议大家选择安全级别为中,选择中会询问你是否启用宏?,选择高和非常高,就直接把宏给宏禁了,不会询问你,呵呵,不过我是设置为低,因为我不怕宏病毒.(备注,我们也可以从注册表里修改,我收藏一个工具,在附件里,有兴趣的朋友可以去下载,名字叫做"方便快速设置宏的安全级别"
代码如下制作方法如下：- 把下面的代码复制到记事本中然后另存为.reg即可，win7和winxp均可用
- Windows Registry Editor Version 5.00
- [HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Office\11.0\Excel\Security]
- "Level"=dword:00000001
- 自己总结的，
- dword:00000001为低
- dword:00000002为中
- dword:00000001为高
- "Level"=””,为正常的
呵呵，这是每一个程序员都要学会的，当你代码写好之后，你是否想加密工程？，为了不让别人随便修改我们的代码，当然有必要，不过，在VBE窗口的工程加密是很脆弱的，如果大家想把自己的代码加密的比较安全，那就要封装成DLL文件，就要通过如VB来封装，我做过一个，做成了COM加载宏，我也上传上来，文件夹名叫做“佛山小老鼠工具栏”，这里我们只介绍简单的工程保护，因为VB我也外行。
方法1：前台的工具菜单，保护，保护并共享工作薄，输入密码
方法2：后台，在VBE窗口里，把工程收拢起来，点其前面的“-”号，再把光标放到你要保护的工程对象上，单击鼠标的右键，VBAProject属性（E）... ,===保护选项卡===勾起那个"查看时锁定工程" 在密码文本中输入密码,两次确定OK了,
怎样解密工程？
方法：是论坛Idhyob老师精心制作的，在此谢谢这位Idhyob老师，解密工具在附件里，名字叫“VBA加密解密器.rar”同样也可以加密
1. 录制选择性粘贴的宏
方法:打开工作薄”选择性粘贴的宏(未做的)”备注这个工作薄在课件里 选择工作表1选择工具菜单宏录制宏，跳出一个对话框，绝对引用确定后选择区域B3:C7单击鼠标的右键复制选择区域H3:I7选择性粘贴加确定双击单元格E3, 单击单元格E4停止录制
ALT+F11,打开VBE编辑窗口,这就是刚才录制的宏代码，- 1# Sub Macro1()'
- 2# ' Macro1 Macro
- '3# 宏由 999宝藏网 录制，时间: 2011-2-7
- 4# Range("B3:C7").Select
- 5# Selection.Copy
- 6# Range("H3:I7").Select
- 7# Selection.PasteSpecial Paste:=xlPasteAll, Operation:=xlAdd, SkipBlanks:= _
- False, Transpose:=False
- 8# End Sub
然后把宏指定给一个椭圆,试试
2. 录制一个清除数据的宏
方法: 选择工具菜单宏录制宏，跳出一个对话框，绝对引用选择区域B3:C7,按Delete键然停止录制
ALT+F11,打开VBE编辑窗口,这就是刚才录制的宏代码，- 1# Sub Macro2()' Macro2 Macro
- ' 宏由 雨林木风 录制，时间: 2010-11-24
- 2# Range("B3:C7").Select
- 3# Selection.ClearContents
- 4# End Sub
然后把宏指定给一个椭圆,试试
4. 修改宏:
修改第2个宏- 1# Sub 汇总()
- 2# Range("B3:C7").Copy
- 3# Range("H3:I7").PasteSpecial Paste:=xlPasteAll, Operation:=xlAdd
- 4# Application.CutCopyMode = 0
- 5# End Sub
5. 保存宏
一种是保存在当前工作薄,一种是保存在个人宏工作薄,另一种保存新工作薄
6. 自定义按钮
视图菜单工具栏自定义命令选项卡类别宏按住左键不放,把自定义按钮那个笑脸拖到常用工具栏上把光标放在那个笑脸上(前提条件是不要关闭自定义工具栏单击鼠标右键命名更改按钮图像指定宏(指定你要实现的此功能
7. 指定宏:
可以把宏指定给图片,自选图形。
呵呵, 这一节课哆嗦了好多,看来这个小老鼠有点"八婆",大家再见,下节课见 晚安
第三讲 VBA的语法基础 108楼 http://club.excelhome.net/thread-691838-11-1.html
[ 本帖最后由 佛山小老鼠 于 2011-3-15 01:09 编辑 ] |
|
楼主: 佛山小老鼠
[复制链接]
沪公网安备 31011702000001号 沪ICP备11019229号-2
发表于 2011-3-13 21:27
