不知道你的” “里面是不是有意留了一个空格，如果是手误，这段代码的意思是在删除第2到地5000行。
不过，我觉得楼主的Delete方法和删除Value的需求是相悖的
如果楼主的代码不是为了测试，那么，这段代码(删除value)其实就是：
Range("A2:A5000").ClearContents
或者(删除单元格)
Range("A2:A5000").Delete
这一句话
当然，如果楼主想保留这个区域中的含有空格的单元格的话，那又当别论了
Range("a", x)表达有错误，
如果用range就要用range("a"&x)表示，
用cells表示就是cells(x,1)或cells(x,"a")
If cells(x,"A") <> " " Then cells(x,"A") .delete
Range("a", x) 改成 cells(x,"a")
内容全部来源于网络收集，如有侵权，请联系网站删除：QQ：24596024