2017-06-18 62 views
-2

幾個月前我發現這vba,非常有用。感謝Edward Bagby突出變化的結果

現在我想知道如何突出更改結果?不是文字,而只是細胞內部。有人能幫我嗎?

我試過後rngName.Copy Destination:=Worksheets("Sheet2").Range("E" & i) 像這樣的一些解決方案,以補充:

ActiveSheet.Cells.Interior.ColorIndex = red 

rng1.Interior.ColorIndex = red 

,但沒有改變。

謝謝您提前!

+1

我投票結束這個問題[off-topic](https://stackoverflow.com/help/on-topic),因爲'*現在我想知道如何突出顯示改變了結果*'是**不是**特定的編程問題,並增加了像'*先謝謝您!'這樣的敘述性碎片*'並沒有改變這一點。 – Jeeped

+0

我目前正在尋找解決方案。但是如果我寫一些東西,我可以誤導別人。我無法寫出一個可能的解決方案。 – Donald

+0

在您的原始文章中顯示您嘗試修改代碼以滿足您的需求和您卡住的位置。然後問一個關於它爲什麼不起作用的具體問題。 –

回答

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