Question

我有一个带有3x3网格的Excel工作表，其中包含整个网格的边框以及网格中的水平和垂直单元格边框。使用VBA子程序，我想改变边框以移除内部边框，但保留周围的边框。为此，我编写了以下代码段

With Selection
    .Clear
    .Borders(xlInsideHorizontal).LineStyle = xlNone
    .Borders(xlInsideVertical).LineStyle = xlNone
    .Merge
    .Font.Color = RGB(0, 255, 0)
    .HorizontalAlignment = xlCenter
    .VerticalAlignment = xlCenter
End With

如果选择为3x3网格，则在执行此代码段时，它会删除水平和垂直内部线条，但它也会删除外边框。如何保持外边界完好无损？我想重新创建它是一个选项，但问题是实际上有许多这些3x3网格，并且根据它们位于工作表上的位置，四个外边框中的每一个都可以呈现不同的线宽。如果不是真的有必要的话，我不必根据网格位置确定使用哪个重量。

Answer 1

不用

尝试代码

Selection.Clear

使用VBA操作范围内的边框

1 个答案: