怎样启用宏

[yaomin65]

我昨天加的宏,今天打开时提示被禁用,即使将宏的安全性设为低也不行啊

[gracexu]

按理说设为低后不应该禁用啊，照楼上的办法试试，设为中，提示后启用。
如果还是禁止，把完整的错误信息贴上来。

[zipall]

推荐宏安全性设置为中，在打开文件时有选择的加载或禁用宏。

设置为中后再打开你的文件，如果还不能用，请将提示内容完整的贴在这里。

[yaomin65]

能否说明的详细点,比如:
我找到G280这个数据是需要的,怎样标注为红色

[gracexu]

你的问题也太笼统了，你把G280 这个单元格的对象拿到。G280是数据还是单元格地址？
如果是地址，那就是
Range("G280").font.colorindex =3 (好像3是红色，我没去查）

[yaomin65]

我是在一组数据中查找重复数据,并将重复的行号列在这组数据的后面,现在想将这个行号用颜色标注出来.
我用你的方法时提示出错(例如找到的行号写在cells(x,y)中):
Range("xy").font.colorindex =3
Range("cells(x,y)").font.colorindex =3
系统提示方法range作用于对象'_global'时失败

[qiucp]

[Quote=引用 4 楼 gracexu 的回复:]
你是在用Excel 是吧？
单元格对象在代码里是 Range，
Range.font.colorindex 可以设置字体颜色，
你可以用对象浏览器看看其它可用的属性。
[/Quote]

[gracexu]

我只是提示你有关代码啊，使用Range 不带限制符很危险的。
你的表单叫什么名字？写成
worksheets("name").Range("xy").font.colorindex =3

[yaomin65]

好用了,都谢两位.
再请教一个问题,我想在宏中将处理的数据结果单元用颜色标注,该怎么写语句

[gracexu]

你是在用Excel 是吧？
单元格对象在代码里是 Range，
Range.font.colorindex 可以设置字体颜色，
你可以用对象浏览器看看其它可用的属性。

[yaomin65]

太好了,多谢

[yaomin65]

呵呵,可不就是我的真实代码啊.
我在程序中去搜索重复的数据,并用颜色标注,我不可能知道是哪一个单元啊,cells(x,y)可用来表示某个单元,为什么range不行啊

[gracexu]

既然在VBA编程,你会用Cells,怎么就不会用Range呢?
你的问题直接这样写就行了.
worksheets("sheet1").Cells(x,y).font.colorindex =3
Cells 本身返回Range 对象.

[yaomin65]

不好意思,我刚开始学.多谢指导

[yaomin65]

老大,我怎么还是用不了啊.
worksheets("sheet1").Range("xy").font.colorindex =3
系统提示:应用程序定义或对象定义错误

[gracexu]

晕,这不会就是你的真实代码吧?
xy只是意思意思啊,要用你实际的值表示.
Range("A10"),Range("B20")这样才对,哪有行号是y的呀.
你执行一下
worksheets("sheet1").Range("A1").font.colorindex =3
看看效果

[gsh2008]

[Quote=引用 9 楼 qiucp 的回复:]
引用 4 楼 gracexu 的回复:
你是在用Excel 是吧？
单元格对象在代码里是 Range，
Range.font.colorindex 可以设置字体颜色，
你可以用对象浏览器看看其它可用的属性。
[/Quote]
回帖是一种美德！