欢迎来到山村网

让Excel活动单元格所在行和列都着上背景颜色的VBA代码

2019-03-05 01:29:47浏览:929 来源:山村网   
核心摘要:  在Excel中,为了增强活动单元格的对比性,有时候我们常常需要修改其背景颜色、字体、字号等,用来区分和其它单元格的对比! 

  在Excel中,为了增强活动单元格的对比性,有时候我们常常需要修改其背景颜色、字体、字号等,用来区分和其它单元格的对比!

  本教程,让我们一起来学习,如何让Excel活动单元格所在行和列都着上背景颜色,首先看下图。

让Excel活动单元格所在行和列都着上背景颜色的VBA代码 山村

  上图中,即C3单元格,被鼠标选中,说明是活动的单元格,如何做才能做到如上图的效果,C3活动单元格所在的行和列,其背景颜色都着上颜色,这样可以方便我们观察单元格,正确的录入数据。

  这得使用VBA代码来完成,方法如下:

  首先在Excel窗口中,按下键盘上的组合键:Alt + F11

  这个时候,会弹出VBA窗口。

  ①右键点击左边列表中的 Sheet1 并选中查看代码。这样就会弹出一小个VBA输入窗口。

  ②在小窗口中的上面,左边选择Worksheet名称,右边选择SelectionChange事件。下面就可以在其内部输入代码了,代码如下:

  Private Sub Worksheet_SelectionChange(ByVal Target As Range)

  Columns().Interior.ColorIndex = 0

  x = ActiveCell.Column

  Columns(x).Interior.ColorIndex = 13

  y = ActiveCell.Row

  Rows(y).Interior.ColorIndex = 13

  End Sub

  最后,保存VBA窗口并关闭,回到Excel窗口,效果就出来了。

  知识扩展:

  部分代码解释:

  Columns().Interior.ColorIndex = 0

  x = ActiveCell.Column

  Columns(x).Interior.ColorIndex = 13

  如上代码的功能,是让活动单元格所在列着上背景颜色的代码。

  y = ActiveCell.Row

  Rows(y).Interior.ColorIndex = 13

  如上代码的功能,是让活动单元格所在行着上背景颜色的代码。

(责任编辑:豆豆)
下一篇:

用"自动图文集"让你的Word也妙语连珠

上一篇:

Excel不规范日期格式快速转换为真正日期

  • 信息二维码

    手机看新闻

  • 分享到
打赏
免责声明
• 
本文仅代表作者个人观点,本站未对其内容进行核实,请读者仅做参考,如若文中涉及有违公德、触犯法律的内容,一经发现,立即删除,作者需自行承担相应责任。涉及到版权或其他问题,请及时联系我们 xfptx@outlook.com