VBA学习笔记

单元格边框

xlDiagonalDown 5 从区域中每个单元格的左上角至右下角的边框。 xlDiagonalUp 6 从区域中每个单元格的左下角至右上角的边框。 xlEdgeBottom 9 区域底部的边框。 xlEdgeLeft 7 区域左边的边框。 xlEdgeRight 10 区域右边的边框。 xlEdgeTop 8 区域顶部的边框。

xlInsideHorizontal 12 区域中所有单元格的水平边框（区域以外的边框除外）。 xlInsideVertical 11 区域中所有单元格的垂直边框（区域以外的边框除外）。

引用EXCEL函数：

Worksheets(5).Range(\& DR2) = \& LR5 & \& DR2 & \

Worksheets(5).Range(\& \

Worksheets(5).Range(\\\车间进货\DR2 & \

.Range(\车间进货\& \

Num = WorksheetFunction.Count(Worksheets(2).Range(\Range(\

n = WorksheetFunction.Lookup(2, [{1, 2, 3 ;\

WorksheetFunction.Match(Cells(R, C), Range(Cells(R, 1), Cells(R, C - 1)), 0)

本文来源：https://www.bwwdw.com/article/abvx.html