其实我本人觉得不必搞那么复杂。
你想在一个表格内实现点某个单无格后,被点中的单元格那一行颜色加深。
那么你可以通过这种方法来执行
首先选中你想要加深的单元格
其次找工具栏中的填充色彩按钮。选中你觉得容易分辨的颜色即可
不过你如果真的有只按一个按钮就可以随便变幻色彩的按钮,不妨告诉我,我也很想学习。呵呵。
祝工作顺利!
不过我试过思雪遥遥的方法,是非常简便的,现在我告诉你具体的操作方法,希望你的工作能够让你称心如意.首先打开一个Excel表格
1.选中Sheet1点右键
2.点击检视程式码
3.出现一个新增Microsoft Excel 工作表.xls-Sheet1(程式码)
4.复制那些代码,然后保存
5.关闭当前页面
关闭后,再看刚才这个Excel表,点一下,看发生了什么?
方法大致一样,只是因为你安装的版本太过精简了,所以察看代码用不了。换一个版本试看看
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Cells.Interior.Pattern = xlNone
Rows(Target.Row).Interior.ColorIndex = 7
End Sub
= 7 这里 可以修改1到9数字来改变颜色。
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Cells.Interior.Pattern = xlNone
Rows(Target.Row).Interior.ColorIndex = 7
End Sub
-------------
你装的是简化版,没有VBA功能,请节哀顺便。
可以自己录制一个宏
工具/宏/录制新宏
操作就是你点一个单元格,然后再把这整行设置一个颜色
再停止录宏,运行他就可以了
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Target.EntireRow.Interior.Color = RGB(255, 0, 0)
End Sub
试试这个简单的小代码吧
==========================================
或者看看这个代码:
http://zhidao.baidu.com/question/35244534.html