Visual Basic para Aplicaciones - Usar valor de combobox dentro de una condicional

Life is soft - evento anual de software empresarial
 
Vista:
sin imagen de perfil
Val: 19
Ha disminuido su posición en 7 puestos en Visual Basic para Aplicaciones (en relación al último mes)
Gráfica de Visual Basic para Aplicaciones

Usar valor de combobox dentro de una condicional

Publicado por Erik (7 intervenciones) el 06/10/2019 04:02:49
Hola buenas tardes, quisiera saber si es posible usar el valor de un combobox dentro de una condicional o if, y como hacer lo, tengo lo siguiente:
1
2
3
4
5
6
7
8
9
10
11
12
13
Valormax=ComboBox1.Value
valorsgte=ComboBox2.Value + 1
valornulo= 0
If valorsgte > Valormax Then
    Sheets("martes").Select
    Range("C2") = "Martes " & valornulo + 1
    valornulo = valornulo + 1
    valorsgte = valornulo + 1
Else
    Sheets("martes").Select
    Range("C2") = "Martes " & valorsgte
    valorsgte = valorsgte + 1
End If

Al hacer correr el código no compara correctamente los valores. Desde ya gracias por su ayuda.
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder
Imágen de perfil de Héctor Madriz
Val: 132
Bronce
Ha disminuido su posición en 2 puestos en Visual Basic para Aplicaciones (en relación al último mes)
Gráfica de Visual Basic para Aplicaciones

Usar valor de combobox dentro de una condicional

Publicado por Héctor Madriz (29 intervenciones) el 06/10/2019 04:40:05
Buen día, prueba esto:

1
2
Valormax = Val(ComboBox1.Value)
valorsgte = Val(ComboBox2.Value) + 1

Saludos
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
2
Comentar
sin imagen de perfil
Val: 19
Ha disminuido su posición en 7 puestos en Visual Basic para Aplicaciones (en relación al último mes)
Gráfica de Visual Basic para Aplicaciones

Usar valor de combobox dentro de una condicional

Publicado por Erik (7 intervenciones) el 07/10/2019 00:52:39
Muchas gracias haz solucionado mi problema, pero me surge la duda esto es válido para asignar una hoja a traves de un ComboBox?, por ejemplo:
Tener esto,
1
2
3
4
If ComboBox15.Value = "Lunes" Then
        Sheets("lunes").Select
        Range("C2") = "Lunes " & ComboBox1.Value
        End If

y Cambiarlo por esto:

1
2
Sheets("Val(ComboBox15.Value)").Select
        Range("C2") = "Val(ComboBox15.Value) " & ComboBox1.Value

La pregunta nace porque debo condensar el código para un botón. Ojalá puedas resolver mi duda y muchas gracias.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar
Imágen de perfil de Héctor Madriz
Val: 132
Bronce
Ha disminuido su posición en 2 puestos en Visual Basic para Aplicaciones (en relación al último mes)
Gráfica de Visual Basic para Aplicaciones

Usar valor de combobox dentro de una condicional

Publicado por Héctor Madriz (29 intervenciones) el 07/10/2019 01:14:05
Buen día,

Referenciar por el nombre
1
Sheets(ComboBox1.Value).Range("C2") = "Valor"

Referenciar por el indice
1
Sheets(Val(ComboBox1.Value)).Range("C2") = "Valor"

Saludos
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
2
Comentar