可能有以下几个方面: 1. 语法错误:首先,需要检查Case语句的语法是否正确。确保每个Case后面跟着一个具体的值或表达式,并且每个Case之间使用逗号或冒号分隔。另外,确保Switch或Sele...
从代码来看，SelectCase的核心也是比较和跳转，无非就是比较的方式不同而已。就本例而言，SelectCase的比较比IfElse多了一次函数调用，因此从性能上讲自然是要比IfElse要低的。综上，二者实现的核心原理是一样的，并无明显优劣之分。二、IfElse与SelectCase有何区别？在语法上，SelectCase的花样更多，比如 Select ...
Case Is = ""Case Is = "a"MsgBox "Y"End Select 以上代码表示如果A1为空时不进行任何操作，A1=a时，提示"Y"
在VBA世界里,也有与“IF…Then…Else”齐名的条件语句“Select… Case”语句。假如遇到这样的条件:“如果是1就进行A,如果是2就进行B,如果是3就进行C……”,也就是处理好多情况的时候,应用“Select…Case”语句就能编出简明、易懂的宏语言。当然了,应用“IF…Then…Else”语句也能做到,但处理多个条件,“Select...
第一种方法是使用带有 TypeName 的案例选择。第二种方法是使用 TypeOf 有一个大的 if else 语句。 我认为方法 1 看起来更干净,可读性更好,但可能会出现拼写错误。我认为方法2具有编译安全性。有没有一种方法是普遍首选的? 'method 1 Select Case TypeName(InputVariable) ...
使用Select Case语句作为在 If... 中使用ElseIf的替代方法。然后。。。将一个表达式与多个不同值进行比较时的 Else 语句。If...Then...Else语句可计算每个ElseIf语句的不同表达式,Select Case语句则只在控制结构顶部计算一次表达式。 在以下示例中,Select Case语句计算传递给过程的参数。 请注意,每个Case语句可以...
(i, 2).Value L = L + 1 End If Case 7 If Day(.Cells(i, 2).Value) = D And MonthName(Month(.Cells(i, 2).Value)) = M And Year(.Cells(i, 2).Value) = Y Then .Cells(L, 8).Value = .Cells(i, 2).Value L = L + 1 End If Case Else MsgBox "Wrong Info" End Select ...
If 条件2 Then 条件2が真の処理 Else If 条件3 Then 条件3が真の処理 Else 全て条件式が偽の処理 End End End このつのVBAコードは同じになります。 多肢の場合は、ElseIfを使う事で見易くなります。 ただ、できればこのElseIfより、Select Caseを使うことを考えましょう...
プロパティの値を設定する場合に実行する必要があるコードでは、プロパティ プロシージャをパブリック変数の代わりに使用してください。 Public変数とは違い、Property プロシージャはオブジェクト ブラウザーでヘルプ文字列を割り当てることができます。
Else MsgBox rng.Address End If End Sub Range("A:A").Find(What:=1234567, この部分を変更しつつ確認してみると、 Range("A:A").Find(What:=1234567, → $A$7 Range("B:B").Find(What:=1234567, → エラー Range("C:C").Find(What:=1234567, → エラー Range("D:D").Find(What:="...