在Excel中如何删除一个区域中的0值，并且其余单元格左移？

按下面做就可以了
1，先选中数据区域－－编辑－－替换－－点右下角的“选项”－－在“单元格匹配”前打上勾，“替换内容”上面填上0，“替换为”不填，点全部替换

2，选中数据区域－－编辑－－定位－－定位条件－－选上“空值”－－确定

3，右键－－删除－－在弹出的提示框中选“右侧单元格左移”－－确定
－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－

1. 选中要操作的区域

2. 按Ctrl+F

3. 

4. 

5. 在回到表中单击鼠标右键---删除----选择单元格左移

6. OK！
   

修改了一小下^_^
===============================
进到VBA,做一个宏
sub delete0()
'i作为行，k作为列
dim i as integer,j as integer,k as integer
'暂设为从第一列
k=1

'当到第N列时，结束程序。N值自己设
N=
liehao:
if k=N then
msgbox "finished!"
exit sub

'当第一列值不为空时循环执行至末尾，暂定第一行
i=1
do while cells(i,k)<>""
if cells(i,k)=0 then
cells(i,k).delete shift:=xltoleft
else
i=i+1
end if
loop
'执行下一列
k=k+1
goto liehao
end sub