excel2010vba笔记(实战教程)(基础实例).docxVIP

PAGE \* MERGEFORMAT27 VBA笔记 8-21 1.VBA是什么： 微软开发出来的应用程序一种能共享通用的自动化语言，VBA能使已有的应用程序(excel等)自动化，可以创建自定义的解决方案.等同:可以用excel的宏语言来使excel自动化,使用word BASIC使word自动化,等等。VBA可以称作excel的“遥控器”.此外,如果你愿意,还可以将excel用做开发平台实现应用程序. 2.VBA可以实现的功能 　 1. 使重复的任务自动化. 　　2. 自定义excel工具栏,菜单和界面. 　　3. 简化模板的使用. 　　4. 自定义excel,使其成为开发平台. 　　5. 创建报表. 6. 对数据进行复杂的操作和分析. 3.宏 3.1录制简单的宏 选择“工具”—“宏”—“录制新宏”—输入宏名—确定—开始录制（状态栏中显示“录制”）—结束宏录制（“工具”—“宏”—“停止录制”。） *开始录制并非一个按钮，而是你的一系列操作，宏会记录下来变为自己的操作。 3.2执行宏 选择任何一个单元格—选择“工具”—“宏”—“宏”（出现 “宏”对话框）—选择相应的宏名—“执行”。 3.3查看录制的代码 工具”—“宏”—“宏”（显示“宏”对话框）—选择某个宏— “编辑” VBA的编辑器窗口（VBE） Sub 改变颜色() //宏名 ’ ’ 改变颜色 Macro ’ xw 记录的宏 2000-6-10 ’ ’ //以上五行录制时自动生成 Range(A5).Select //表示无论选择哪个单元格，最后都只作用于A5 With Selection.Interior //设置属性在选择区域的内部（开始录制属性） .ColorIndex = 3 //颜色为3号色：红色 .Pattern = xlSolid //区域内部图案=纯色（录制时自动生成，可删） PatternColorIndex = xlAutomatic //内部图案底纹颜色=自动（自动生成，可删） End With //结束属性录制 End Sub//结束宏录制 一个名为练习的宏： Sub 练习() 练习 宏 With Selection.Borders(xlEdgeLeft) .LineStyle = xlContinuous .ColorIndex = 0 .TintAndShade = 0 .Weight = xlMedium End With With Selection.Borders(xlEdgeTop) .LineStyle = xlContinuous .ColorIndex = 0 .TintAndShade = 0 .Weight = xlMedium End With With Selection.Borders(xlEdgeBottom) .LineStyle = xlContinuous .ColorIndex = 0 .TintAndShade = 0 .Weight = xlMedium End With With Selection.Borders(xlEdgeRight) .LineStyle = xlContinuous .ColorIndex = 0 .TintAndShade = 0 .Weight = xlMedium End With Selection.Borders(xlInsideVertical).LineStyle = xlNone Selection.Borders(xlInsideHorizontal).LineStyle = xlNone With Selection.Interior .Pattern = xlSolid .PatternColorIndex = xlAutomatic .Color = 5296274 .TintAndShade = 0 .PatternTintAndShade = 0 End With With Selection.Font .Color = .TintAndShade = 0 End With End Sub 3