可以直接设置，也可以用with语句。
工具/原料
excel2016
vba
vbe
方法/步骤
1、我们要给excel单元格加边框，其实挺简单的，选中需要添加边框的单元格，点击开始选项卡下的框线就可以了。
2、我们堑霎夭酾应用vba的过程中，想要全自动的处理数据，并且给处理后的数据加上边框该怎么办？我这里有两种办法。第一种：不带任何的选择，直接给需要的单垌桠咛虞元格加边框。Sub加边框()Sheet1.Range("C5:F15").Borders.LineStyle=TrueEndSub
3、第二种：选择单元格语句，然后用with语句设置单元格边框。Sub加边框2()Sheet1.Range("C5:F15").SelectWithSelection.Borders.LineStyle=TrueEndWithEndSub
4、个人比较喜欢第一种方法。这一句加到一个自动的过程里。Sub宏1()Applicati艺皱麾酪on.ScreenUpdating=F锾攒揉敫alseDimiAsIntegerDimtt=TimerFori=1To3000Step1Range("A"&i)=iNextSheet1.Range("A1:A3000").Borders.LineStyle=TrueMsgBox("程序运行了"&Format(Timer-t,"0.00"&"秒"))EndSub
5、Sheet1.Range("A1:A3000").Borders.LineStyle=True这一句里的“A1：A3000”也可以是变量。
6、仅供大家参考！