Question

我正在尝试更改某些单元格中边框的颜色。奇怪的是，我能够在工作簿的某些工作表中更改边框颜色，但在一张工作表上，边框颜色不会改变，或者只有2条边框线会改变。我尝试过使用：

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

当我这样做时，ColorIndex的值会改变，因为我可以使用

在立即窗口中显示其新值

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

但边框的实际颜色不会改变。这是在脚本的另一部分期间从另一个工作簿复制的工作表。是否有一些设置会阻止颜色正确显示？

Answer 1

试

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

设置Borders.ColorIndex不会改变颜色

1 个答案: