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

2025-10-10 23:46:09

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

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

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]查看宏代码

声明:本网站引用、摘录或转载内容仅供网站访问者交流或参考,不代表本站立场,如存在版权或非法内容,请联系站长删除,联系邮箱:site.kefu@qq.com。
猜你喜欢