时间戳

首页 > 解决方案 > 从 Excel 2016 VBA 中的单元格范围中删除底部边框 - 不起作用？

excel - 从 Excel 2016 VBA 中的单元格范围中删除底部边框 - 不起作用？

问题描述

我有一个范围sh.Range("F46:I46")目前有一个很薄的底部边框，我想使用 VBA 摆脱它，但我尝试过的解决方案未能奏效。现在我只有：

sh.Range("F46:I46").Borders(xlEdgeBottom).LineStyle = xlNone

我也试过：

For Each r In sh.Range("F46:I46")
    r.Borders(xlEdgeBottom).LineStyle = xlNone
Next r

...这实际上是同一件事，在这里找到，我也尝试过：

sh.Range("F46:I46").Borders.LineStyle = Excel.XlLineStyle.xlLineStyleNone

...我认为这是在这里找到的 VB.net 代码。

我哪里错了？？？？？？谢谢！

标签： excelvba

解决方案

我发现是什么让它起作用了。我刚用过：

sh.Range("F46:I48").Borders.LineStyle = xlNone

...没有xlEdgeBottom在 Borders 函数中指定，并稍微扩大范围，因此在我的范围附近应用的任何“边框”都不是 xlEdgeBottom 类型。该命令只是将它们全部删除。

此外，另一个有效的解决方案是将 Normal 单元格样式应用于相关范围，使用：

sh.Range("F46:I48").Style = "Normal"

谢谢大家！

推荐阅读