关于活动单元格行列高亮问题

我在网上搜到一个活动单元格行列高亮的代码可以用，然后我想所有工作簿都可以用这个功能，百度网上说可以用宏，但是新建的 宏已经有开头和结尾了，我把高亮的代码复制进去运行就会提示缺少END sub，对宏不了解，想问怎么才能实现我想要的功能或者怎么把下面这段高亮代码写进宏呢？
代码
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Cells.Interior.ColorIndex = 2 '初始化背景颜色
Rows(Target.Row).Interior.ColorIndex = 33 '设置选中的行颜色
Columns(Target.Column).Interior.ColorIndex = 33 '设置选中的列颜色
Target.Cells.Interior.ColorIndex = 43 '设置选中的单元格颜色
End Sub