Sub
If [S9] = [S10] Then
If [S10] = [S11] Then
If [S11] = [S12] Then
If [S12] = [S13] Then
If [S13] = [S14] Then
ActiveSheet.Shapes("SIGNAL3").Select
End If
End If
End If
End If
End If
End Sub
Как можно записать это с помощью одного if?
If [S9] = [S10] Then
If [S10] = [S11] Then
If [S11] = [S12] Then
If [S12] = [S13] Then
If [S13] = [S14] Then
ActiveSheet.Shapes("SIGNAL3").Select
End If
End If
End If
End If
End If
End Sub
Как можно записать это с помощью одного if?