51Testing软件测试论坛

标题: 怎么用VB来设置excel 行的颜色？ [打印本页]

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

作者: 5555 时间: 2009-9-8 16:19
教你个很简单的方法，你在Excel中录制一个宏（将A到D设置为红色），然后去看这个宏的代码　就知道怎么写了

作者: zero0223 时间: 2009-9-9 10:54
xlSheet1.Range("A: A").Interior.ColorIndex = 6
就是一列了呀

作者: peterz 时间: 2009-9-9 14:10
VBRED ,VBGREEN 等等。

作者: whoamiyaya 时间: 2009-9-9 22:53
这个也只能用在外部的excel表格上面吧，不能用在qtp本身的datasheet上哦

作者: lijinshui 时间: 2009-9-10 09:00

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

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

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

作者: lijinshui 时间: 2009-9-10 10:38

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

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

作者: liujinkui 时间: 2009-9-10 10:59
没有明白楼上为什么是要改变一行的颜色哪?
EXCEL表一行有多少列哪?

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

欢迎光临 51Testing软件测试论坛 (http://bbs.51testing.com/)