Sub Macro1()'' Macro1 Macro'' Rows("1:1").Delete Shift:=xlUp Columns("B:B").Delete Shift:=xlToLeftEnd Sub以上是EXCEL删除的方法
先把数据做“分列”,数据就都分在不同的列中了,然后,删除整列就很容易了。