Ingresar claves con if anidados

Hola ya te había hecho una pregunta con anterioridad, fue sobre unos claves que tenia ingresar que eran 150 variables, que por cierto me sirvió muchísimo tu respuesta, ahora tengo otra pregunta como podría hacerle para ese mismo caso pero con if anidados, de antemano gracias Elsamatilde

1 Respuesta

Respuesta
1
Te aclaro que es mejor que Select... pero aquí va una rutina de ejemplo:
Sub anidacion()
miValor = ActiveCell
If miValor < 0 Then
ActiveCell.Interior.ColorIndex = 3
ElseIf miValor < 50 Then
ActiveCell.Interior.ColorIndex = 5
ElseIf miValor < 100 Then
ActiveCell.Interior.ColorIndex = 27
ElseIf miValor < 150 Then
ActiveCell.Interior.ColorIndex = 36
'siguen los ElseIf
End If
End Sub

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas