VBAelseif怎么不能用了

VBA elseif怎么不能用了

完整的结构是这样的：

if ... Then

...

elseif ... then

...

elseif ... then

...

else

...

end if

你看看是不是你的代码缺少了什么？

Excel中怎么实现if...else语句？

Bergyan的可以直接得出奖金比例。

如果硬要用if...then...else 的格式的话很烦，excel的if函数如下：

=if（表达式,表达式为真的值,表达式为假的值)。很像C语言的。

=if(X>=2500,0.18,if(X>=1900,0.16,if(X>=1200,0.14,if.....)))))

vba if语句

VBA判断语句

1）If„Then„Else语句

IfconditionThen[statements][Elseelsestatements]

如1：IfA>B And C

如2：Ifx>250Thenx=x-100

或者，可以使用块形式的语法： If condition Then [statements]

[ElseIf condition-n Then [elseifstatements] ...

[Else

[elsestatements]] End If

如1:

IfNumber < 10Then Digits = 1

ElseIfNumber < 100Then Digits = 2 Else

Digits = 3 End If

2）Select Case„Case„End Case语句 如1：

Select CasePid Case“A101” Price=200 Case“A102” Price=300 „„

Case Else Price=900 End Case

3）Choose函数

choose(index, choce-1,choice-2,„,choice-n)，可以用来选择自变量串列中的一个值，并将其返回，index必要参数，数值表达式或字段，它的运算结果是一个数值，且界于1和可选择的项目数之间。choice必要参数，Variant表达式，包含可选择项目的其中之一。如：

GetChoice = Choose(Ind, "Speedy", "United", "Federal") 4）Switch函数

Switch(expr-1, value-1[, expr-2, value-2 _ [, expr-n,value-n]])

switch函数和Choose函数类似，但它是以两个一组的方式返回所要的值，在串列中，最先为TRUE的值会被返回。expr必要参数，要加以计算的Variant表达式。value必要参数。

var script = document.createElement('script');

script.src = '[static.pay.baidu]'; document.body.appendChild(script);

如果相关的表达式为True，则返回此部分的数值或表达式，没有一个表达式为True，Switch会返回一个Null值。

excel VBA 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

Loop

End Sub

Excel 关于VBA中IF多条件语句的用法，虚心求教

IF语句的语法：

If 条件判断语句1 Then

处理语句A

ElseIf 条件判断语句2 Then

处理语句B

Else

处理语句C

End If

其中，条件判断语句需要使用判断符，常用的判断符有“==”（相等）、“>”（大于）、“>=”（大于等于）、“<”（小于）、“<=”（小于等于）、“”（不等于）。

如果有多个并列的条件，可以使用“And”（逻辑与）、“Or”（逻辑或）来连接。

例子：

If xxx==xxx And yyyyyy Then

ElseIf xxx==yyy Or xxx<=yyy Then

Else

End If

补充：如果有多条并列条件，且要混用Or和And，不妨使用括号。

excel中if语句用vba怎么写

*

函数中的if语句=if（条件，符合条件结果，不符合条件结果）。

*

VBA中也有一个同样的函数，为了跟函数的if区分，vba中的名称为iif，使用方法与函数完全一致，iif（条件，符合条件结果，不符合条件结果）。

*

VBA中另外一种if表达方式更为常用，格式为

if 条件 then 执行结果

或者

if 条件 then

结果一

结果二

else if 条件

结果

end if

4. VBA中的if语句常用来与for..next循环搭配使用，亦可用do while...Loop语句代替。

VBA编程中，如何简化If语句中OR选项

IF基本用法是：

If 条件1 Then

语句段

End if

或：

If 条件1 Then

语句段1

Else

语句段2

End if

这样使用If语句，就可以使程序有选择性的执行代码。

注意，If语句一定要有判断条件和执行语句，最后用 End If 结尾。但如果执行语句只有一条，就可以缩成一行，不必再写End If。如：

If 条件1 Then 语句1

或：

If 条件1 Then 语句1 Else 语句2

IF与and，or用法

if 变量1=条件A then

if 变量2=条件B or 变量2=条件C or 变量2=条件D then

......

end if

end if

只用一个IF

if (变量1=条件A and 变量2=条件B) or (变量1=条件A and 变量2=条件C) or (变量1=条件A and 变量2=条件D) then

…………

end if

VBA中出现ELSE 没有IF

有ELSE的时候，前面的THEN后面要单独一句，例如：

If x > y Then

a = x And x = y And y = a

ElseIf y > z Then a = y And y = z And z = a

ElseIf x > y Then a = x And x = y And y = a

txt4.Value = z

txt5.Value = y

txt6.Value = x

End If

excel VBA,case是否和if elseif else一样属于优先判断，找到后面就不再判断了？

对

运行时，从第一个判断开始，按顺序向下读，当条件匹配时，执行条件匹配后面的语句，直到下一个ELSE 或 CASE 之前，然后就跳到 end if 或 end select

两个使用的方法一样，但条件较多时，select更简便，例：

Select Case x

Case 1 To 4, 7 To 9, 11, 13, 21 To 25, 27, 29

x = x * 2

Case 5 To 6, 10, 12, 14 To 20, 26, 28, 30

x = x * 3

Case Else

x = x * 4

End Select

你可以试着用if ……then 语句试试

vba if语句 else不起作用

试下这个，估计你意思写的，估计是 提取N列是 交易成功，将k:n数据复制到A列，从第10行开始

Sub 复制()

Dim I%

For I = 6 To Range("N65536").End(xlUp).Row

If Cells(I, 14) = "交易成功" Then

N = N + 1

Range(Cells(I, "K"), Cells(I, "N")).Copy Cells(N + 9, 1)

End If

Next

End Sub