vb合并单元格

用VB操作excel，
删除一列，其余列依次往前移