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

ExCEl vBA ElsE iF

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

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

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

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

VBA中IF是语句,写法之一为:IF 条件 THEN 语句 ELSE 语句 VBA里面要使用类似工作表的IF函数,需要使用IIF

vba代码: if a

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

Function zhekou(zhanyoulv As Double, t As Integer)If zhanyoulv < 0.035 ThenIf t 30 Thenzhekou = 0End IfEnd IfEnd IfElseIf zhanyoulv >= 0.035 And zhanyoulv 0.04 And zhanyoulv

cells(4,4)改成cells(x,4)rows(4)改成rows(x)第二个if另起行end if后面再加上 end if next x

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