[求助]点按单元格，所在行列自动变色的问题

yymexcel · 发表于 2006-4-10 18:24

我看到一个帖子，在自定义中设置有＝activerx＝row（），＝activecx＝cloumn（），但还用了vba，我有点搞不懂，有哪位高手能给我讲讲具体的操作过程，小弟先谢过！

来生缘 · 发表于 2006-4-10 18:54

G0OaYOJn.rar (7.98 KB, 下载次数: 214) 从论坛下载下来的一个实例

jacksonzeng · 发表于 2006-4-10 19:50

With Target.EntireRow.FormatConditions
.Delete
.Add xlExpression, , "TRUE"
.Item(1).Interior.ColorIndex = Int(50 * Rnd() + 2)
End With

主要是通过对目标单元格行列格式COLORINDEX属性的变化而产生的高亮显示。

山菊花 · 发表于 2006-4-10 20:18

JC7Um4OE.rar (8.61 KB, 下载次数: 134)

gvntw · 发表于 2006-4-10 20:25

请参考：

yymexcel · 发表于 2006-4-10 22:18

实在惭愧，楼上几位所言极是，但本人实在愚笨，我自己希望在我的文件中设置高亮显示，但就是作不出来，还希望高手们抽点时间，给点提示，最好有设置步骤，因为我对“宏”是一窍不通，哎，悲哀！

aichong · 发表于 2006-4-10 22:26

这个不用“宏”，不用加载到每个文件中，推荐使用！：http://club.excelhome.net/dispbbs.asp?boardid=31&replyid=582455&id=91821&page=1&skin=0&Star=6 64楼：http://club.excelhome.net/dispbbs.asp?boardid=31&replyid=582559&id=91821&page=1&skin=0&Star=7

[此贴子已经被作者于2006-4-10 22:30:50编辑过]

yymexcel · 发表于 2006-4-10 22:52

好像是乱码，无法浏览

aichong · 发表于 2006-4-10 23:24

以下是引用[I]yymexcel[/I]在2006-4-10 22:52:27的发言：[BR]
好像是乱码，无法浏览

我的可以浏览啊！干脆上传文件给你：

OtemWbhE.rar (81.94 KB, 下载次数: 174)

yymexcel · 发表于 2006-4-10 23:43

多谢楼上大哥，我已经成功加载，非常实用，谢了！不过兄弟有个不情之请，我想学学

With Target.EntireRow.FormatConditions
.Delete
.Add xlExpression, , "TRUE"
.Item(1).Interior.ColorIndex = Int(50 * Rnd() + 2)
End With

主要是通过对目标单元格行列格式COLORINDEX属性的变化而产生的高亮显示。

		自动登录	找回密码
密码			免费注册