excel VBA语句无法执行
Subnihao()DimrngAsRangeForEachrngIn[a1:a9]Ifrng=""ThenRange(rng).EntireRow.DeleteNext...
Sub nihao()
Dim rng As Range
For Each rng In [a1:a9]
If rng = "" Then Range(rng).EntireRow.Delete
Next
End Sub
初学者想问下，这个语法出了什么问题？为什么无法运行。怎么改呢？ 展开
Dim rng As Range
For Each rng In [a1:a9]
If rng = "" Then Range(rng).EntireRow.Delete
Next
End Sub
初学者想问下，这个语法出了什么问题？为什么无法运行。怎么改呢？ 展开
1个回答
展开全部
Sub nihao()
Dim rng As Range
For Each rng In [a1:a9]
If rng = "" Then rng.EntireRow.Delete
Next
End Sub
Dim rng As Range
For Each rng In [a1:a9]
If rng = "" Then rng.EntireRow.Delete
Next
End Sub
本回答由提问者推荐
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
