VBA快速插入、删除Excel工作表指定行或列

https://mp.weixin.qq.com/s?__biz=MzkwMzY1OTIzOA==&mid=2247483756&idx=1&sn=0b9bdc8a2d3afb21c3164379af17bf3d&chksm=c093aae5f7e423f3a41d5ef2b79e5f66ab57a574d39304565ae97379e66d3c1373ee30b1e635&token=1544340580&lang=zh_CN#rd

Excel工作表做数据统计时，经常需要插入删除指定行或列，如何快速准确完成工作？VBA代码，快速解决问题，让加班不再继续。

1、删除行时，下方单元格上移或右方单元格左移；删除列时，右方单元格左移。常用方法如下：

Function Delrow1()    '删除工作表某一行

   Worksheets("Sheet1").Rows(2).Delete Shift:=xlUp     '删除"Sheet1"工作表第二行,下方单元格上移

   Worksheets("Sheet1").Columns(2).Delete Shift:=xlToLeft   '删除"Sheet1"工作表第二列，右方单元格左移

   Worksheets