VBA: ¿cómo detectar un número par?
Resuelto
mod77
Mensajes publicados
1320
Fecha de registro
Estado
Miembro
Última intervención
-
Nico -
Nico -
Hola,
No consigo mostrar los números pares en el siguiente bucle:
for i =1 to 4
If i = Odd Then 'si i impar
Cells(12, "A").Value = i
Else 'si i par
Cells(12, "B").Value = i
End If
next
Me muestra todos los números sin pasar por then, pero solo por Else.
¿Puede decirme dónde está el error, por favor?
Gracias.
Configuración: Windows XP 2002 SP3
Excel 2002
¡Saber decir NO es un deber y una fuerza! ¡No tengan miedo! ¡La unión hace la fuerza!
¡Marquen como resuelto si lo está!
No consigo mostrar los números pares en el siguiente bucle:
for i =1 to 4
If i = Odd Then 'si i impar
Cells(12, "A").Value = i
Else 'si i par
Cells(12, "B").Value = i
End If
next
Me muestra todos los números sin pasar por then, pero solo por Else.
¿Puede decirme dónde está el error, por favor?
Gracias.
Configuración: Windows XP 2002 SP3
Excel 2002
¡Saber decir NO es un deber y una fuerza! ¡No tengan miedo! ¡La unión hace la fuerza!
¡Marquen como resuelto si lo está!
2 respuestas
Yo respondo a mi pregunta yo mismo porque acabo de encontrar esto:
for i =1 to 4
If i mod 2 <>0 Then 'si i impar
Cells(12, "A").Value = i
Else 'si i par
Cells(12, "B").Value = i
End If
next
--
¡Saber decir NO es un deber y una fuerza! ¡No tengas miedo! ¡La unión hace la fuerza!
¡Pasa a resuelto si lo es!
for i =1 to 4
If i mod 2 <>0 Then 'si i impar
Cells(12, "A").Value = i
Else 'si i par
Cells(12, "B").Value = i
End If
next
--
¡Saber decir NO es un deber y una fuerza! ¡No tengas miedo! ¡La unión hace la fuerza!
¡Pasa a resuelto si lo es!