【资料图】

1、ALT+F11。

2、复制代码就好Private Sub Worksheet_SelectionChange(ByVal Target As Range) cells.***.colorindex = xlColorIndexNone With Target .entirerow.***.color = vbYellow .entirecolumn.***.color = vbYellow End WithEnd Sub。

本文到此分享完毕，希望对大家有所帮助。

标签：