基于VBA代码和控件操作,实现一键去除工作表中所有单位格的边框。
先打开一个Excel文档。
本教程以下列单位格为例,包含两个含边框区域。
起首插入一个肆意外形。
为外形指心猿意马宏代码。
选择新建按钮。
此时会跳转到VBA界面,在窗口中复制粘贴(笼盖粘贴)以下代码:
Sub 矩形1_Click()
Cells.Select
Selection.Borders(xlInsideVertical).LineStyle = xlNone
Selection.Borders(xlInsideHorizontal).LineStyle = xlNone
Cells(1, 1).Select
End Sub
封闭VBA窗口,回到Excel界面。
单击外形即可断根工作表中所有的边框。
0 篇文章
如果觉得我的文章对您有用,请随意打赏。你的支持将鼓励我继续创作!