0

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

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

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

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

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

4

1 回答 1

2

尝试

    ActiveCell.Borders(xlEdgeLeft).ColorIndex = 7
    ActiveCell.Borders(xlEdgeRight).ColorIndex = 7
    ActiveCell.Borders(xlEdgeTop).ColorIndex = 7
    ActiveCell.Borders(xlEdgeBottom).ColorIndex = 7
于 2013-01-21T18:22:54.313 回答