excel有没有多分支判断函数
答案:2 悬赏:20 手机版
解决时间 2021-02-10 20:20
- 提问者网友:人傍凄凉立暮秋
- 2021-02-10 01:20
excel有没有多分支判断函数
最佳答案
- 五星知识达人网友:逐風
- 2021-02-10 02:59
你是指什么样的“分支“,请举例说明
全部回答
- 1楼网友:雪起风沙痕
- 2021-02-10 04:18
用vba吧,打开要处理的工作簿,选中要处理的工作表,按alt+f11,粘贴以下内容后按f5执行完再关闭microsoft visual basic窗口看执行效果。
成功使用的几个前提:
1、你说的有颜色的行必须包括到a列,比如第10行有颜色,那就要求a10里面有颜色。否则请修改相应代码;
2、你说的有颜色的行必须在a列有数据,比如第10行有颜色,那就要求a10里面有数据,不能是空。否则请修改相应代码;
3、处理的工作表名称为sheet1。否则请修改相应代码。
'代码开始===========================================================
private sub deleter()
dim i, j as integer
j = sheets("sheet1").range("a65536").end(xlup).row
for i = 1 to j
range("a" & i).select
if activecell.interior.colorindex = -4142 then
rows(i & ":" & i).select
selection.delete shift:=xlup
end if
range("a" & i).select
if activecell.interior.colorindex = -4142 and activecell.value <> "" then
i = i - 1
end if
next i
end sub
'代码结束===========================================================
我要举报
如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息,可以点下面链接进行举报!
点此我要举报以上问答信息
大家都在看
推荐资讯