这是一个非常简单的问题,我似乎找不到解决方案。基本上,我使用3种不同的电池样式(好,中性和坏)。我只想做的是,我希望将与我用颜色编码的那个单元相邻的单元格设置为相同的颜色。例如,我选择的单元格O11为好(绿色),因此单元格M11应根据单元格O11自动更改其单元格样式。
有什么建议么?
PS O11将手动设置(无条件格式)
要解决您的问题,您需要创建一个变量来保存单元格的颜色值,然后将该值设置回另一个单元格。使用以下示例:
Sub Copy_Color()
变暗iColor变长
变暗i变长
for i = 11 to 20
iColor = worksheets("Sheet name").range("M" & i).Interior.Color
worksheets("Sheet name").range("O" & i).Interior.Color = iColor
next
结束子
本文收集自互联网,转载请注明来源。
如有侵权,请联系[email protected] 删除。
我来说两句