1、点击[开发工具]-代码模块的[宏],看到录制的宏,选中点[编辑],进入“Microsoft Visual Basic for Applications”(简称VBA)的代码编辑状态。另外在EXCEL窗口上同时按ALT+F11也可以可以直接进入VBA的代码编辑状态。
![EXCEL宏使用经验集:[2]查看宏代码](https://exp-picture.cdn.bcebos.com/2e223d85e036e2914d4f8253b2723d03baea5b3e.jpg)
2、在左侧的"工程资源管理器"(如果看不到,可以按Ctrl+R呼出)中找到“模块”,一般我们录制的第一宏就在“模块1”中。双击“模块1”在右侧的空白窗口中会看到我们先前录制的代码。
3、代码中的 "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]查看宏代码](https://exp-picture.cdn.bcebos.com/3c42a5ea3e86304870e46667c33104ebf7a7523e.jpg)