Variable cambia valor según celda
Tengo que cambiar el valor de esta variable... TipoComp = , si I5 es igual a "A" TipoComp = 1, si I5 es igual a "B" TipoComp = 6
1 respuesta
H0la Beto:
Puede ser así
If Range("A5").Value = "A" Then
TipoComp = 1
ElseIf Range("A5").Value = "B" Then
TipoComp = 1
End IfO asumir que si no es A entonces es B y hacerlo de esta otra forma
TipoComp = IIf(Range("A5").Value = "A", 1, 6)S@lu2
Corrijo la primera
If Range("A5").Value = "A" Then
TipoComp = 1
ElseIf Range("A5").Value = "B" Then
TipoComp = 6
End If
Mil disculpas!
Una corrección más. Reemplazar A5 por I5.
S@lu2
¡Gracias! Como los Admiro, lo hacen ver todo tan fácil, algún día voy a aprender a usar condicionales como vos.
Acá hay gente muy buena, Beto. Por mi parte sólo intento seguirles los pasos.
Un consejo que te podría dar es que no tengas miedo de aportar a otros con lo que tú sabes, ya que sus dudas te llevan a investigar un poco más.
S@lu2
No se si puedo ampliar la complejidad de esta fórmula en este mismo hilo, ya que no me deja preguntar lo mismo, la variable es la misma TipoComp.
si I5 = "A" y K5 = "FACTURA" TipoComp = 1
si I5 = "B" y K5 = "FACTURA" TipoComp = 6
si I5 = "A" y K5 = "CREDITO" TipoComp = 3
si I5 = "B" y K5 = "CREDITO" TipoComp = 8
H0la Beto:
Esta es la forma más sencilla de hacerlo.
If Range("I5").Value = "A" Then
If Range("K5").Value = "FACTURA" Then
TipoComp = 1
ElseIf Range("K5").Value = "CREDITO" Then
TipoComp = 3
End If
ElseIf Range("I5").Value = "B" Then
If Range("K5").Value = "FACTURA" Then
TipoComp = 6
ElseIf Range("K5").Value = "CREDITO" Then
TipoComp = 8
End If
End IfS@lu2
Esta fácil, te me adelantaste ja :D - Andy Machin
Si es que es eso lo que pide!! Uno nunca sabe!!Ja ja ja.Un gusto saludarte, Andy - Isaac Reyes
Comentario borrado por el autor - Pedro Tassone