☰

在 Excel 2013 中更改多个单元格的边框颜色而不更改边框样式

tag-icon • tag-icon microsoft-excel
在 Excel 2013 中更改多个单元格的边框颜色而不更改边框样式

但是，是否可以在不更改边框样式的情况下更改所有边框颜色？我已经尝试选择线条颜色并使用 CTRL 浏览单元格 - 但这确实会改变线条样式，而我有多种样式，我不想从头开始。

答案1

在 VBA 中，您可以.colorindex独立于边框对象的其他属性来更改该属性：

Sub bordercolor()
    With Selection.Borders
        .ColorIndex = 32
    End With
End Sub

这只会改变边框颜色，而不会改变线条样式或宽度。为方便起见，请将此宏分配给一个键。32表示颜色索引值，请根据您的喜好进行调整。请参阅本文如果您只想更改一个特定边框（xlDiagonalDown，xlDiagonalUp，xlEdgeBottom，xlEdgeLeft，xlEdgeRight，xlEdgeTop或），xlInsideHorizontal请查看边框集合的描述。xlInsideVertical

相关内容