Excel使用宏代码聚焦单元格

1、Excel启用宏（2016版本），其他版本差不多，启用后就可以很方便使用宏了，启用方式如下图：

2、Alt + F11打开VBE，点击 插入->模块 插入一个新模块，复制如下代码到模块中，将Excel文件保存为启用宏的Excel文件。聚焦特效代码如下：

Option Explicit

Sub 宏1()

'

' 宏1 宏

'

'

    With Selection.Interior

        .Pattern = xlSolid

        .PatternColorIndex = xlAutomatic

        .Color = 65535

        .TintAndShade = 0

        .PatternTintAndShade = 0

    End With

End Sub

Sub 宏2()

'

' 宏2 宏

'

'

    Selection.EntireRow.Delete

    Target.EntireColumn

    Target.EntireRow

End Sub

3、复制代码粘贴到模块后，效果如下所示：