如何使用VB.net在Excel中删除范围内的单元格？
目标达成：去除范围内的任何边界。
我有 ：
Dim range As Excel.Range = sheet.Range("A2:K100") For Each cell In range // Some cells in the Range has borders // How to remove borders from cells in the range Next cell 请帮忙.. ！
我是Vb.net的新手！
range.Borders(Excel.XlBordersIndex.xlEdgeLeft).LineStyle = Excel.XlLineStyle.xlLineStyleNone range.Borders(Excel.XlBordersIndex.xlEdgeRight).LineStyle = Excel.XlLineStyle.xlLineStyleNone range.Borders(Excel.XlBordersIndex.xlEdgeTop).LineStyle = Excel.XlLineStyle.xlLineStyleNone range.Borders(Excel.XlBordersIndex.xlEdgeBottom).LineStyle = Excel.XlLineStyle.xlLineStyleNone range.Borders(Excel.XlBordersIndex.xlInsideHorizontal).LineStyle = Excel.XlLineStyle.xlLineStyleNone range.Borders(Excel.XlBordersIndex.xlInsideVertical).LineStyle = Excel.XlLineStyle.xlLineStyleNone
删除单元格和单元格之间的边界（通过xlInsideHorizontal和xlInsideVertical ）。 如果您期望对angular线边框，请包含xlDiagonalDown和xlDiagonalUp 。
好的，上面的代码非常冗长。 以下也应该这样做：
For Each border in range.Borders border.LineStyle = Excel.XlLineStyle.xlLineStyleNone Next
请参阅： http : //msdn.microsoft.com/zh-CN/library/microsoft.office.interop.excel.borders.aspx
编辑：
在查看MSDN页面时，我想知道这个class轮是否也可以这样做：
range.Borders.LineStyle = Excel.XlLineStyle.xlLineStyleNone
检查NamedRange.BorderAround方法 。
Dim range As Excel.Range = sheet.Range("A2:K100") range.BorderAround(Excel.XlLineStyle.xlLineStyleNone, Excel.XlBorderWeight.xlThin, Microsoft.Office.Interop.Excel.XlColorIndex.xlColorIndexAutomatic, missing)
欢呼声，祝你好运！
范围（“A2：K100”）。Borders.LineStyle = xlNone
为什么所有的答案如此复杂？
为整个表使用…
With .Cells .Borders.LineStyle = xlLineStyleNone End With
对于一个范围只是取代.Cells适当的