设置Borders.ColorIndex不会更改颜色

我正在尝试更改某些单元格中边框的颜色。 奇怪的是,我可以在工作簿的某些表格中更改边框颜色,但是在一张工作表中,边框颜色不会更改,或者只有两条边框线条会发生更改。 我试过使用:

testWorksheet.cells(row,column).Borders.ColorIndex=7 

当我这样做时,ColorIndex的值发生变化,因为我可以使用立即窗口显示其新值

 ?testWorksheet.cells(row,column).Borders.ColorIndex 

但边框的实际颜色不会改变。 这是在脚本的另一部分从另一个工作簿复制的工作表。 是否有一些设置可以防止颜色正常显示?

尝试

  ActiveCell.Borders(xlEdgeLeft).ColorIndex = 7 ActiveCell.Borders(xlEdgeRight).ColorIndex = 7 ActiveCell.Borders(xlEdgeTop).ColorIndex = 7 ActiveCell.Borders(xlEdgeBottom).ColorIndex = 7