Question

我似乎无法找到我需要的边框样式。可用性似乎比excel本身少。我想在上面和下面加一行，类似于在数字列上加起来的总数。出于会计目的。

 excel.XlLineStyle.xlContinuous

或

excel.XLbordersIndex.

似乎只有极少的选项

我想要的格式如下（类似于：

＆＃34; -------------＆＃34;

======

两个边界应该是连续的

感谢您的帮助

Answer 1

很久以前我最后一次用VBA玩了

我认为以下是您正在寻找的内容：

Sub Foo()
    Dim range As range
    Set range = Worksheets(1).range("B2")

    With range.Borders(xlEdgeTop)
        .LineStyle = xlContinuous
        .Weight = xlThick 'Optionally set a weight
        .ColorIndex = 23  'or a color
    End With

    With range.Borders(xlEdgeBottom)
        .LineStyle = xlDouble
    End With
End Sub

vb.net 2010 Excel边框样式

1 个答案: