excel vba删除空白单元(高手请进)

Question

用VBA
用这样来指定(B5:I20)删除范围
http://pan.baidu.com/s/1nMetw

Answer 1

把vba中的函数Set a = Sheet4.Range("B10:AI254")该一下不久行了。改为B：AI254改为B5:I20追问

往上缩(也就是删除空白的,让数往上移动)

追答

没问题呀，就是这样的。

追问

Sub 删除空单元格()
Set a = Sheet3.Range("B10:AI254")
End Sub
是这样子吗?
但是我执行时,没反应呢

Answer 2

帖主说明不清晰。
删除黄色的单元格，是下行往上缩，还是右边往左缩？追问

往上缩