让excel像wps一样出现个阅读模式
先来看一下WPS阅读模式的界面:
excel如何实现这种功能呢?
要在哪个工作表里面使用这个功能就对着哪个工作表标签右键-查看代码
2.在弹出的窗口右边的编辑框中放入以下代码:
Public rg As Range
Private Sub Worksheet_Selecti (ByVal Target As Range)
If Not rg Is Nothing Then Columns(rg.Column).Interior.Pattern = xlNone
If Not rg Is Nothing Then Rows(rg.Row).Interior.Pattern = xlNone
Columns(Target.Column).Interior.Color = 39999
Rows(Target.Row).Interior.Color = 39999
Set rg = Target
End Sub
现在返回excel工作薄的“sheet2”工作表随便点击一个单元格就会发现被选中的这个单元格对应的整行、整列都会高亮添加颜色,实现了WPS的“阅读模式”功能!
注意事项:
代码一定要放入你要使用这个功能对应的工作表的VBE编辑器中。
Columns(Target.Column).Interior.Color = 39999 这一句是为选中单元格对应的整列设置颜色,“39999”是颜色代码,小伙伴们可以根据自己的需求更改颜色代码。
Rows(Target.Row).Interior.Color = 39999 这一句是为选中单元格对应的整行设置颜色,“39999”是颜色代码,小伙伴们可以根据自己的需求更改颜色代码。