本文作者:office教程网

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

office教程网 2024-05-15 21:24:40
后台-系统设置-扩展变量-手机广告位-内容正文顶部
摘要: 在Excel中,为了增强活动单元格的对比性,有时候我们常常需要修改其背景颜色、字体、字号等,用来区分和其它单元格的对比!
本教程,让我们一起来学习,如何让Ex...

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

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



上图中,即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

Excel相减函数的换位思考

Excel相减函数的换位思考 首先我们看下面。 上表中,A列保存的是第一个数,B列保存的是第二个数。现在,我们要通过函数,实现这样的功能,实现第一个数减去第二个数后的结果,其结果放在C列。 只需要使用到SUM函数就可以实现,所谓的换位思考,无非是在正数的前面加一个-减号即可。 该思想来源于数学思维,比如:1-5=-4,相当于1 (-5)=-4 实现的函数公式如下: 在C1单元格中使用公式:=SUM(A2,-B2) 即可。 其它单元格的结果,直接往下一拉就可以得出正确的结果。

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

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

VBA判断Excel选择区域是否有合并单元格

VBA判断Excel选择区域是否有合并单元格 要想判断合并单元格,得分为两种情况: ①:当前选中的单元格为合并单元格; ②:选区内有合并单元格; 代码一: If Selection.MergeCells or IsNull(Selection.MergeCells) Then MsgBox

后台-系统设置-扩展变量-手机广告位-内容正文底部
未经允许不得转载:

作者:office教程网,原文地址:让Excel活动单元格所在行和列都着上背景颜色的VBA代码发布于2024-05-15 21:24:40
转载或复制请以超链接形式并注明出处 演示站

分享到:

觉得文章有用就打赏一下文章作者

支付宝扫一扫打赏

微信扫一扫打赏

留言与评论(共有 0 条评论)
   
验证码: