Excel能否设置鼠标点停在一行那行就变色

前一阵来了个客户 他的Microsoft EXCEL 用鼠标点在哪一行 哪一行就变颜色 是如何办到的。。请教大家

VBA代码,可以实现这个功能,
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Cells.Interior.Color = xlNone
Union(Target.EntireRow, Target.EntireColumn).Interior.Color = vbYellow
End Sub

用条件格式也可以。

如果你用的是WPS,还可以使用阅读模式
温馨提示:答案为网友推荐,仅供参考
第1个回答  2015-10-11
可以尝试一下,如下的代码:
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN"
" ">
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>无标题文档</title>
<script>
var ob;
function cTo(cc)
{
ob= cElement;
ckgroundColor=cc;
}
function cBack(cc)
{
ckgroundColor=cc;
}

</script>
<script language="JavaScript" type="text/JavaScript">
<!--
function MM_reloadPage(init) { //reloads the window if Nav4 resized
if (init==true) with (navigator) {if ((appName=="Netscape")&&(parseInt(appVersion)==4)) {
document.MM_pgW=innerWidth; document.MM_pgH=innerHeight; onresize=MM_reloadPage; }}
else if (innerWidth!=document.MM_pgW || innerHeight!=document.MM_pgH) load();
}
MM_reloadPage(true);
//-->
</script>
</head>

<body>
<div id="Layer1" style=" z- "></div>
<table width="652" height="177" border="1" cellpadding="0" cellspacing="0" onMouseOver="cTo('#ff00ff')" onMouseOut="cBack('white')">
<tr>
<td> </td>
</tr>
<tr>
<td> </td>
</tr>
<tr>
<td> </td>
</tr>
<tr>
<td> </td>
</tr>
<tr>
<td> </td>
</tr>
<tr>
<td> </td>
</tr>
<tr>
<td> </td>
</tr>
<tr>
<td> </td>
</tr>
<tr>
<td> </td>
</tr>
<tr>
<td> </td>
</tr>
</table>
</body>
</html>
第2个回答  2011-03-02
有个软件,可以设置,点在任一格子,那个行或者列变色,可以设置变什么颜色。那个软件还有很多实用的小功能,office 2003和2007、2010都可以用。
需要的话,留邮箱给我,我发给你;或者你自己网上搜索“excel必备工具箱”。

希望对你有所帮助。追问

[email protected]

追答

已发。请查收。

本回答被提问者采纳
相似回答