下图是参考答案的内容：

写为过程为：

Sub 删除单元格()
'删除B4单元格，删除后右侧单元格左移
Range("B4").Delete Shift:=xlToLeft
'删除B4单元格，删除后下方单元格上移
Range("B4").Delete Shift:=xlUp
'删除B4单元格所在的行
Range("B4").EntireRow.Delete
'删除B4单元格所在的列
Range("B4").EntireColumn.Delete
End Sub

上一篇：excel教程：让OnKey方法和OnTime方法的设置自动生效 下一篇：excel怎么做表格：让执行VBA过程时屏幕不出现闪烁现象

郑重声明：本文版权归原作者所有，转载文章仅为传播更多信息之目的，如作者信息标记有误，请第一时间联系我们修改或删除，多谢。