Sub abc()For i = 1 To 5 Cells(i, 2).Delete Shift:=xlUpNextEnd Sub在这个代码执行时,因为用了 Shift:=xlUp 会提示“一些单元格会被拆散”。如果把它改成 Shift:=xlToLeft 就不会提示(只删除A1与B1合并单元格时)了。
如果是删除B列的内容,那就不应该称为删除,而是清空。用到的就不是delete而是ClearContents
把代码贴出来看看
整列删除会出错吗?!不要一个一个删除