EXCEL宏录制好后,可以直接使用(但是局限性比较大,对于一些灵活性较高的操作需要对宏代码进行改进)。也可以从已经录制的宏代码中挖取一些EXCEL的操作方式,以便进一步修改宏,使宏更适应我们的工作。
前期准备工作(包括相关工具或所使用的原料等)
EXCEL2010
详细的操作方法或具体步骤
点击[开发工具]-代码模块的[宏],看到录制的宏,选中点[编辑],进入“Microsoft Visual Basic for Applications”(简称VBA)的代码编辑状态。另外在EXCEL窗口上同时按ALT+F11也可以可以直接进入VBA的代码编辑状态。
![EXCEL宏使用经验集:[2]查看宏代码](http://www.52ij.com/uploads/allimg/160404/21132G022-0.jpg)
在左侧的"工程资源管理器"(如果看不到,可以按Ctrl+R呼出)中找到“模块”,一般我们录制的第一宏就在“模块1”中。双击“模块1”在右侧的空白窗口中会看到我们先前录制的代码。
代码中的 "Sub 宏1()" 与 "End Sub"之间即是宏的整个操作步骤。其中 Application.WindowState=xlMinimized 将EXCEL窗口最大化
Range("A1").Select 单元格A1被选中
With Selection.Interior 对已经选中的单元格(A1)进行操作
.Pattern=xlSolid
.PatternColorIndex=xlAutomatic
.Color=255 设置为红色
.TintAndShade=0
.PatternTintAndShade=0
End With
Range("A2").Select 单元格A2被选中
ActiveCell.FormulaR1C1="宏" 在激活的单元格(A2)中输入“宏”
Range("A2").Select 单元格A2被选中
Selection.Font.Bold=True 设置为粗体
Selection.Font.Italic=True 设置为斜体
With Selection.Font
.Color=-11489280 设置颜色
.TintAndShade=0
End With
With Selection.Font
.Name="宋体" 设置为宋体
.Size=26 设置字号26
.Strikethrough=False
.Superscript=False
.Subscript=False
.OutlineFont=False
.Shadow=False
.Underline=xlUnderlineStyleNone
.Color=-11489280 设置颜色
.TintAndShade=0
.ThemeFont=xlThemeFontMinor
End With
Range("A3:D11").Select 选择"A3:D11"区域
![EXCEL宏使用经验集:[2]查看宏代码](http://www.52ij.com/uploads/allimg/160404/21132J054-1.jpg)
- 评论列表(网友评论仅供网友表达个人看法,并不表明本站同意其观点或证实其描述)
-
