多语言展示
当前在线:153今日阅读:176今日分享:34

EXCEL宏使用经验集:[2]查看宏代码

EXCEL宏录制好后,可以直接使用(但是局限性比较大,对于一些灵活性较高的操作需要对宏代码进行改进)。也可以从已经录制的宏代码中挖取一些EXCEL的操作方式,以便进一步修改宏,使宏更适应我们的工作。
工具/原料

EXCEL2010

方法/步骤
1

点击[开发工具]-代码模块的[宏],看到录制的宏,选中点[编辑],进入“Microsoft Visual Basic for Applications”(简称VBA)的代码编辑状态。另外在EXCEL窗口上同时按ALT+F11也可以可以直接进入VBA的代码编辑状态。

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'区域

推荐信息