Question

我正试图在另一个if else中做一个if else。但它没有If就给了我Else的错误。我有一个如果有，但VBA怎么没有看到它？

a = Sheet1.ComboBox1.value
If unit <> a Then
  If a = "mils" Then
    Set cx = Sheet9.range("E2", Sheet9.range("E2").End(xlDown))
    For Each rng In cx
    rng.value = rng.value * y
  Else
    Set cx = Sheet9.range("E2", Sheet9.range("E2").End(xlDown))
    For Each rng In cx
    rng.value = rng.value / y
  End If
End If

Answer 1

您错过了Next的{{1}}，这使For和IF块交错。

For

Answer 2

这是for each语句

的语法错误

以下是VBA中For Each循环的语法：

For Each element In Group
   [statement 1]
   [statement 2]
   ....
   [statement n]
   [Exit For]
   [statement 11]
   [statement 22]
Next    //you are missing this line in your coding

if else else if else error

2 个答案: