Forums Últimos mensajes - Powered by IBM
 
Tags Palabras claves

If con or para varias condiciones

07/12/2004 - 04:55 por Compumakro | Informe spam
Ayuda Hacer una pregunta
Amigos:
La siguiente fórmula porqué no me funciona ni en OffXP ni en Off97?

If Cells(3, 5) = 4 Or 6 Or 8 Or 10 then
Cells(3, 7) = 15000
End If
If Cells(3, 5) = 12 Or 14 Or 16 then
Cells(3, 7) = 18000
End If
If Cells(3, 5) = "S" Or "M" then
Cells(3, 7) = 20000
End If
If Cells(3, 5) = "L" Or "XL" then
Cells(3, 7) = 22000
End If

Gracias
Oscar
email Siga el debateRespuesta 16 respuestasRespuesta Tengo una respuesta
DRAGON AGE™: INQUISITION – Matadragones
 

Leer las respuestas

#1 Héctor Miguel
07/12/2004 - 06:08 | Informe spam
hola, Oscar !

La siguiente formula porque no me funciona ni en OffXP ni en Off97? [...]



debido a que los 'casos Or'... NO estan siendo 'operacionales' [no se estan 'comparando' con nada] :(
prueba con una 'estructura' diferente [+/- como la siguiente]
[... otras lineas de tu codigo ...]
Dim Precio As Integer ' o... Long o... Single o... Double <='checate' los tipos de datos
Select Case Cells(3, 5)
Case 4, 6, 8, 10: Precio = 15000
Case 12, 14: Precio = 18000
Case "S", "M": Precio = 20000
Case "L", "XL": Precio = 22000
End Select
Cells(3, 7) = Precio
[... otras lineas de tu codigo ...]

saludos,
hector.

Preguntas similares

 

Busqueda sugerida :