怎么用VB来设置excel 行的颜色？

topor · 发表于 2009-9-8 16:09:30

在网上查了一下，设置单元格颜色的语句是：
xlsSheet.Cells(i,4).Interior.ColorIndex =3
网上有达人说设置行颜色的语句是：
xlSheet1.Range("A: D").Interior.ColorIndex = 6
但是我试过之后发现第二个语句是设置了整个sheet的A~D列的颜色。
要怎么样才能设置某一行的某几列的颜色呢？谢谢！

5555 · 发表于 2009-9-8 16:19:23

教你个很简单的方法，你在Excel中录制一个宏（将A到D设置为红色），然后去看这个宏的代码　就知道怎么写了

zero0223 · 发表于 2009-9-9 10:54:34

xlSheet1.Range("A: A").Interior.ColorIndex = 6
就是一列了呀

peterz · 发表于 2009-9-9 14:10:46

VBRED ,VBGREEN 等等。

whoamiyaya · 发表于 2009-9-9 22:53:49

这个也只能用在外部的excel表格上面吧，不能用在qtp本身的datasheet上哦

lijinshui · 发表于 2009-9-10 09:00:44

原帖由 whoamiyaya 于 2009-9-9 22:53 发表
这个也只能用在外部的excel表格上面吧，不能用在qtp本身的datasheet上哦

啊,这不就是给QTP做插件嘛,成功的话,HP的猎头回来找你的

topor · 发表于 2009-9-10 10:10:42

我就是要用的外部的excel 呢。
我试过下面这个句子了
xlSheet1.Range("A: D").Interior.ColorIndex = 6
它的结果是把整个sheet的A-D列全部标识成一个颜色了，不是某一行的。

lijinshui · 发表于 2009-9-10 10:38:07

原帖由 topor 于 2009-9-10 10:10 发表
我就是要用的外部的excel 呢。
我试过下面这个句子了
xlSheet1.Range("A: D").Interior.ColorIndex = 6
它的结果是把整个sheet的A-D列全部标识成一个颜色了，不是某一行的。

嗨,你用一个循环把偶数行或者基数行的染色不就可以啦?

liujinkui · 发表于 2009-9-10 10:59:36

没有明白楼上为什么是要改变一行的颜色哪?
EXCEL表一行有多少列哪?

topor · 发表于 2009-9-10 17:15:39

我想改变某一行几列的颜色，比如说定位到第3行，把A~D列设为红色。
因为我现在是用excel 做一个比较checkpoint的case，把expect result 跟actual result 都写到excel ，然后比较这两个column的值，如果不一样则fail。然后想把这行（A~D)列标识为红色。

		自动登录	找回密码
密码			(注-册)加入51Testing

[求助] 怎么用VB来设置excel 行的颜色？

相关帖子

站长推荐 /1