突出变化的结果

问题描述:

几个月前我发现这vba,非常有用。感谢Edward Bagby突出变化的结果

现在我想知道如何突出更改结果?不是文字,而只是细胞内部。有人能帮我吗?

我试过后rngName.Copy Destination:=Worksheets("Sheet2").Range("E" & i) 像这样的一些解决方案,以补充:

ActiveSheet.Cells.Interior.ColorIndex = red 

rng1.Interior.ColorIndex = red 

,但没有改变。

谢谢您提前!

+1

我投票结束这个问题[off-topic](https://*.com/help/on-topic),因为'*现在我想知道如何突出显示改变了结果*'是**不是**特定的编程问题,并增加了像'*先谢谢您!'这样的叙述性碎片*'并没有改变这一点。 – Jeeped

+0

我目前正在寻找解决方案。但是如果我写一些东西,我可以误导别人。我无法写出一个可能的解决方案。 – Donald

+0

在您的原始文章中显示您尝试修改代码以满足您的需求和您卡住的位置。然后问一个关于它为什么不起作用的具体问题。 –

如果你想改变目的地范围内有一个红色内饰的颜色,你可以使用:

Worksheets("Sheet2").Range("E" & i).Interior.Color = vbRed 

如果你想改变范围内有一个红色的内饰颜色,你可以使用:

rngName.Interior.Color = vbRed 
+0

如果我更改了 工作表(“Sheet2”)。范围(“E”和i) 到 工作表(“Sheet2”)。范围(“E”&i).Interior.Color = vbRed 我得到一个错误:运行时错误'1004':object'_Global'的方法'范围'失败 – Donald

+0

@Donald - “变更”是什么意思?你说你尝试过一些行,比如'ActiveSheet.Cells.Interior.ColorIndex = red'和'rng1.Interior.ColorIndex = red',但你没有说你尝试过'Worksheets(“Sheet2”)。Range(“E “&i).Interior.ColorIndex = red',所以我担心你正在改变你的'Copy'命令,而不是使用我建议的那一行,而不是你说过的那一行。 – YowE3K