excel删除工作表中的指定的单元格、行和列及单元格移动

在excel中，有时候我们需要动态删除数据或者删除固定的区域数据。删除数据后，一般是表格是空白单元格。那么我们需要控制数据是下移，上移还是左右移动呢？
如原表，我们利用VBA代码在Excel工作表中删除指定的单元格、行和列

1512723973210511.png

详细源码：SubDeleteCellRowColumn()
'删除活动单元格，下方单元格上移
ActiveCell.DeleteShift:=xlUp
'删除选定的区域，右方单元格左移
Selection.DeleteShift:=xlToLeft
'删除行或列
Range("B2").Select
Selection.EntireRow.Delete
Range("B2").Select
Selection.EntireColumn.Delete
EndSub
删除效果图：

1512723994323469.png