【VBA】点击工作簿中的每个单元格，整行整列变色-白红宇

【VBA】点击工作簿中的每个单元格，整行整列变色

阅读量：6969 次

发布时间：2019-06-27

本文共 330 字，大约阅读时间需要 1 分钟。

需求描述

在点击单元格的时候，单元格所在行与列都变色显示

实现方案

打开Excle表格，按住ALT+F11

双击上图中的ThisWorkbook

Private Sub Workbook_SheetSelectionChange(ByVal Sh As Object, ByVal Target As Range)    Cells.Interior.Pattern = xlNone    Rows(Target.Row).Interior.ColorIndex = 3    Columns(Target.Column).Interior.ColorIndex = 4End Sub

代码中的3、4为颜色标记，具体参照下图：

将上述代码贴入

然后另存表格为

转载地址：http://ioisl.baihongyu.com/

你可能感兴趣的文章

c/c++ sizeof运算符详解以及对象大小

问题集录--从初级java程序员到架构师，从小工到专家

查看>>

CSS3自定义滚动条样式 -webkit-scrollbar(转)

Rhel6-keepalived+lvs配置文档

.NET MVC+EF CodeFirst+IOC+EasyUI 框架设计教程（概述）