Excel VBA

我要做一个按钮，要实现比如:A1到A100，里面都有内容，如果其中有几行没有内容，或者隔几行才有内容，则/我点一下按钮没有内容的就会被整行删除掉，哪位大神可以帮忙写个代码吗(我不要排序，排序我要的顺序会乱掉)

sub kk()
for x=1 to 100
if cells(x,1)="" then
rows(x).delete
end if
next
end sub
手机码字，没测试

不感兴趣

开通SVIP免广告

发过来，我帮你弄（看我ID，加我QQ。）

sub kk()
for x=100 to 1 step -1
if cells(x,1)="" then
rows(x).delete
end if
next
end sub

按钮怎么搞？

下载贴吧APP
看高清直播、视频！

分享到: