基于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 篇文章
如果覺得我的文章對您有用,請隨意打賞。你的支持將鼓勵我繼續創作!