Ejecutar macro si se cumple condición

Ante todo un saludo. Tengo 2 celdas, supongamos A1 me muestra la cantidad de un producto en existencia y en B1 yo ingreso una cantidad a solicitar de dicho producto. Lo que deseo es que cuando A1>=B1 se ejecute una macro y en caso contrario se posicione en la celda C1. Algo así como que me valide que la cantidad a solicitar sea menor o igual a la de la existencia. Quise hacerlo con la validación de datos y que la macro se active con en evento Change, pero cuando se introduce una cantidad que excede la existencia y sale el mensaje de la validación para corregir; una vez corregido el valor la macro se ejecuta tres veces en lugar de solo una. La macro a activar en cuestión solo copia unos valores y los pega en otras celdas. Espero haberme explicado y gracias de antemano
{"lat":7.88514728342433,"lng":-65.91796875}

1 respuesta

Respuesta
1
Usa el siguiente código en el evento change:
 If Cells(1, 1).Value >= Cells(1, 2).Value Then
  Cells(1, 3).Activate
 Else
  Call mensaje
End If
Luego crea un procedimiento llamado mensaje:
Private Sub mensaje()
 MsgBox ("La cantidad no puede superar el stock")
End Sub

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas