EXCEL中关于使用VB宏添加边框的问题~

2025-02-26 01:25:57
推荐回答(2个)
回答1:

Sub bor()
Sheet1.Range("A1:IV65536").Borders.LineStyle = xlNone
Sheet1.UsedRange.Borders.LineStyle = xlContinuous

End Sub

可根据实际情况将sheet1修改为你所在的表格名称。

回答2:

Sub ideal()
Me.UsedRange.Borders.LineStyle = xlContinuous
End Sub