Hola de nuevo,
Ya que me anterior mente me ayudaron a resolver el pequeño problema (pero grande para mi ya que soy totalmente nueva en esto ) me surgió otra duda un poco clara para mi, es simple ahora solo necesito condicionar a tres celdas de mi hoja de calculo según sea el caso, pero no se si sea posible anidar una estructura de control select case en otra, mi código original es el siguiente en le cual solo declaro las variales pero aun no aplico la estructura de control para dos de ellas ya que mi duda es como hacerlo.
GRACIAS DE TODO
MI CODIGO
Sub según_sea()
'declarar variables
Dim Porcentaje As Single
Dim Valor As Integer, resultado As Integer, equivalente As Integer
'asignar valores a la celda
Porcentaje = Range("F8").Value
resultado = Range("F9").Value
equivalente = Range("F10").Value
Select Case Porcentaje
Case 0.5
Valor = 0
resultado = 0
equivalente = 0
Case 0.6
Valor = 580
resultado = 580
equivalente = 580
Case 0.7 <= 0.709
Valor = 790
resultado = 790
equivalente = 790
Case 0.8
Valor = 1030
resultado = 1030
equivalente = 1030
Case 0.9
Valor = 1300
resultado = 1300
equivalente = 1300
Case 1#
Valor = 1600
resultado = 1600
equivalente = 1600
Case 1.1
Valor = 1690
resultado = 1690
equivalente = 1690
Case 1.2
Valor = 1800
resultado = 1800
equivalente = 1800
Case 1.21 <= 1.21
Valor = 1920
resultado = 1920
equivalente = 1920
Case Else
Valor = 0
resultado = 0
equivalente = 0
End Select
'asigna el valor obtenido segun la condicion
Range("G8").Value = Valor
'asigna el valor obtenido segun la condicion
Range("G9").Value = resultado
'asigna el valor obtenido segun la condicion
Range("G10").Value = equivalente
End Sub