wxcc.net
当前位置:首页 >> ExCEl vBA ElsE iF >>

ExCEl vBA ElsE iF

If 条件1 Then 处理 ElseIf 条件2 Then 处理 Else 处理 End If 条件与条件之间可以用 "And, Or, Not" 等。 判断符可以用 "=,,=," 等。

对 运行时,从第一个判断开始,按顺序向下读,当条件匹配时,执行条件匹配后面的语句,直到下一个ELSE 或 CASE 之前,然后就跳到 end if 或 end select 两个使用的方法一样,但条件较多时,select更简便,例: Select Case x Case 1 To 4, 7 To ...

Sub test()Dim i As LongFor i = 2 To 1245If InStr(Cells(i, 9), "产品") > 0 Then Cells(i, 16) = 1Else Cells(i, 16) = 0End IfNext iEnd Sub

IF语句的语法: If 条件判断语句1 Then 处理语句AElseIf 条件判断语句2 Then 处理语句BElse 处理语句CEnd If其中,条件判断语句需要使用判断符,常用的判断符有“==”(相等)、“>”(大于)、“>=”(大于等于)、“

Sub s() Dim i&, t$ i = 1 t = Cells(i, 1).Text Do While t "" If InStr(t, "市") Then Cells(i, 2) = 1 ElseIf InStr(t, "省") Then Cells(i, 2) = 2 Else Cells(i, 2) = 0 End If i = i + 1 t = Cells(i, 1).Text LoopEnd Sub

vba代码: if a

函数中的if语句=if(条件,符合条件结果,不符合条件结果)。 VBA中也有一个同样的函数,为了跟函数的if区分,vba中的名称为iif,使用方法与函数完全一致,iif(条件,符合条件结果,不符合条件结果)。 VBA中另外一种if表达方式更为常用,格式...

Function zhekou(zhanyoulv As Double, t As Integer) If zhanyoulv < 0.035 Then If t 30 Then zhekou = 0 End If End If End If Else If zhanyoulv >= 0.035 And zhanyoulv 0.04 And zhanyoulv

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列的单元

if嵌套 sub 条件() if 满足条件0 then if 满足条件1 then 结果1 else 结果2 end if end if end sub 不过我觉得你还可以试试看if嵌套select case 如果你的条件超过2个以上的话 欢迎到Excel Home论坛学习、交流

网站首页 | 网站地图
All rights reserved Powered by www.wxcc.net
copyright ©right 2010-2021。
内容来自网络,如有侵犯请联系客服。zhit325@qq.com