2016/06/07

Excle画线

AppExcel.Selection.Borders(" & CStr(i) & ").LineStyle = 1;

xlDiagonalDown 5 从区域中每个单元格的左上角至右下角的边框。
xlDiagonalUp 6 从区域中每个单元格的左下角至右上角的边框。
xlEdgeBottom 9 区域底部的边框。
xlEdgeLeft 7 区域左边的边框。
xlEdgeRight 10 区域右边的边框。
xlEdgeTop 8 区域顶部的边框。
xlInsideHorizontal 12 区域中所有单元格的水平边框（区域以外的边框除外）。
xlInsideVertical 11 区域中所有单元格的垂直边框（区域以外的边框除外）。