帐号: 密码:
// 设为首页 // 收藏本站 // 请您留言 // 网址导航
远方教程-满足你的求知欲!
站内搜索:
HTML ASP PHP CSS DIV Dreamweaver Photoshop Word Excel PPT SEO技巧
您当前位置:网站首页 >> Office教程 >> VBA入门教程 >> 阅读文章

一周学会VBA第一天:从录制宏开始走进VBA

来源:远方教程 作者:远方教程 发布时间:2014-12-01 查看次数:6857 访问[新版]

  1.3 录制简单的宏

  在介绍学习VBA之前,应该花几分钟录制一个宏。
新术语:"宏",指一系列EXCEL能够执行的VBA语句。
以下将要录制的宏非常简单,只是改变单元格颜色。请完成如下步骤:

  1)打开新工作簿,确认其他工作簿已经关闭。
2)选择A1单元格。调出"常用"工具栏。
3)选择 "工具"—"宏"—"录制新宏"。
4)输入 "改变颜色"作为宏名替换默认宏名,单击确定,注意,此时状态栏中显示"录制",特别是"停止录制"工具栏也显示出来。替换默认宏名主要是便于分别这些宏。
★ 宏名最多可为255个字符,并且必须以字母开始。其中可用的字符包括:字母、数字和下划线。宏名中不允许出现空格。通常用下划线代表空格。
5)选择 "格式"的"单元格",选择"图案"选项中的红色,单击"确定"。
6)单击 "停止录制"工具栏按钮,结束宏录制过程。

※ 如果 "停止录制"工具栏开始并未出现,请选择"工具"—"宏"—"停止录制"。

录制完一个宏后就可以执行它了。

  1.4 执行宏

当执行一个宏时,EXCEL按照宏语句执行的情况就像VBA代码在对EXCEL进行"遥控"。但VBA的"遥控"不仅能使操作变得简便,还能使你获得一些使用EXCEL标准命令所无法实现的功能。而且,一旦熟悉了EXCEL的"遥控",你都会奇怪自己在没有这些"遥控"的情况下,到底是怎么熬过来的。要执行刚才录制的宏,可以按以下步骤进行:

  1)选择任何一个单元格,比如A3。
2)选择"工具"—"宏"—"宏",显示"宏"对话框。
3)选择 "改变颜色",选择"执行",则A3单元格的颜色变为红色。试着选择其它单元格和几个单元格组成的区域,然后再执行宏,以便加深印象。

1.5 查看录制的代码

到底是什么在控制EXCEL的运行呢?你可能有些疑惑.好,让我们看看VBA的语句吧.

  1)选择"工具"—"宏"—"宏",显示"宏"对话框。
2)单击列表中的"改变颜色",选择"编辑"按钮。

  此时,会打开VBA的编辑器窗口(VBE)。关于该编辑器,以后再详细说明,先将注意力集中到显示的代码上。代码如下:(日期和姓名会有不同)

Sub 改变颜色()
'
' 改变颜色 Macro
' xw 记录的宏 2000-6-10
'

With Selection.Interior
.ColorIndex = 3
.Pattern = xlSolid
.PatternColorIndex = xlAutomatic
End With
End Sub

将来会十分熟悉这种代码,虽然现在它们看上去像一种奇怪的外语。学习VBA或编程语言在某种程度上比较像在学习一种外语。

Sub 改变颜色():这是宏的名称。

中间的以" ' "开头的五行称为"注释",它在录制宏时自动产生。

        以With 开头到End With 结束的结构是With结构语句,这段语句是宏的主要部分。注意单词"selection",它代表"突出显示的区域"(即:选定区域)。With Selection.Interior :它读作"选择区域的的内部".这整段语句设置该区域内部的一些"属性"。

其中:

.ColorIndex = 3: 将该内部设为红色。注意:有一小圆点,它的作用在于简化语句,小圆点代替出现在With后的词,它是With结构的一部分。另外:红色被数字化为3.(红色警戒是否可称作:3号警戒,嗯?)有兴趣的话,你将3改为其他数字试试看。

.Pattern = xlSolid:设置该区域的内部图案。由于是录制宏,所以,虽然你并未设置这一项,宏仍然将其记录下来(因为在"图案"选项中有此一项,只是你为曾设置而已)。xlSolid表示纯色。

.PatternColorIndex = xlAutomatic:表示内部图案底纹颜色为自动配色。

End With:结束With 语句。

End Sub:整个宏的结束语

1.6 编辑录制的代码

  在上一节,我们录制了一个宏并查看了代码,代码中有两句实际上并不起作用。哪两句?现在,在宏中作一个修改,删除多余行,直到和下面代码相同:

Sub 改变颜色()
'
' 改变颜色 Macro
' xw 记录的宏 2000-6-10

With Selection.Interior
.ColorIndex = 3
End With
End Sub

完成后,在工作表中试验一下。你会发现结果和修改前的状况一样。在With 语句前加入一行:

Range("A5").Select

试着运行该宏,则无论开始选择哪个单元格,宏运行结果都是使A5单元格变红.

现在可以看到,编辑录制的宏同样非常简单。需要编辑宏是因为以下三个方面的原因。一:在录制中出错而不得不修改。二:录制的宏中有多余的语句需要删除,提高宏的运行速度。三:希望增加宏的功能。比如:加入判断或循环等无法录制的语句。

第1页 第2页 第3页
打印 打印 | 关闭 关闭 评论
相关文章
图片新闻
站内搜索  
搜索
猜您喜欢  
最新更新  
阅读排行  
关于我们 | 联系方式 | 大事记 | 免责声明 | | 给我留言
部分广告源自金山联盟2345联盟 QQ咨询 站长之家QQ群:232617873
Copyright 2024 远方教程 © All Rights Reserved.

回顶部