the_value= ThisWorkbook.Sheets("Sheet1").Range("A1").ValueEnd Sub 1.if...endif WithThisWorkbook.Sheets("Sheet1")Ifthe_value ="1"ThenMsgBox(the_value)EndIfEndWith 2.if...else...endif WithThisWorkbook.Sheets("Sheet1")Ifthe_value ="1"ThenMsgBox(the_value)ElseMsgBox(the_value)EndIfEndWi...
If 条件表达式 Then 满足条件执行语句 Else 不满足条件执行语句 End if （表示条件语句结束的标志）例如，a=2 if a>1 then a=3 else a=4 endif 这段代码就表示，如果a的值大于1，则给a赋值为3，否则就赋值为4。在具体的使用过程中我们的if条件语句可以嵌套使用，但是要注意条件判断的流程和if语句的结束标...
1 同样，我们先新建一个模块。2 在里面写入如下代码，if 语句形式如下：if for 都要分别用结尾词endif next 3 点击运行，如果左边是1，那么右边写入老虎，如果左边是2，那么右边写入杠子，如果左边是3，那么右边写入鸡。运行如下效果，注意，我们这里用到了3个endif.4 elseif 我们就不用写那么多endif了，但是不...
1.if 语句出现后才能出现elseif ，而且后面不能再出现if , 看你第三行有if 出现。2.你的语句里面最后有2个end if
6 这个VBA小程序涉及到了“IF”语句和“For“语句。IF语句的完整的框架结构为If……then（elseif）……thenendifFor语句是控制循环语句的完整的框架结构为：“For……Next”。在这个程序中我们先理解If语句的含义。7 如果（IF）H2单元格中的数据大于等于480，那么(Then)I2单元格中填充“优秀”，如果（IF）H2...
这一段后面按回车换行；你这种写法不对。
❑ If condition Then [statements] Else [statements] EndIf。 ❑ If condition Then [statements] ElseIf conditionn Then[statements] ... Else [statements] End If。 上述语句结构中的condition表示的是条件表达式,statements则表示的是可执行的语句。下面将对上面的4种情况逐一进行讲解。
Range("b1") = "正数" ElseIf Range("a1") = 0 Then ‘如果A1=0，B1就是显示0，这里是第二个条件，所以用了ELSE IF Range("b1") = "等于0" ElseIf Range("B1") <= 0 Then ’‘如果A1小于0，B1就是显示负数 Range("b1") = "负数" EndIfEnd Sub ...
运行提示是 next 没有for，是因为这行If Range("e" & i) = "女" then这行写错了。应该用If上方加一行Endif，或者将该行的If改为ElseIf 另外，你是先写入代号和称呼之后删行，这样如果是需要删除的行，就多此一举了。我重新给你写一遍吧：Sub 操作()Dim s%, i% '定义s为整数，i为整数 ...
if cells（6,2）=1 then cells(7,3)=cells(7,8)elseif cells（6,2）=2 then cells(7,3)=cells(8,8)elseif cells（6,2）=3 then cells(7,3)=cells(9,8)endif 注意 cells（i，j） i表示第多少行，j表示第多少列 比如c7 表示的是第7行，第3列的单元 ...