Para el registro de la clase, ingresaré los puntajes de mis alumnos y deseo que estos puntajes no sean más altos que el puntaje más alto posible. En el caso, ingresé un valor más alto que el puntaje más alto posible, debería aparecer una nota. ¿Qué tengo que hacer?

Hasta ahora, tiene dos respuestas con Formato condicional como la solución de elección. Si bien es relativamente sencillo, el Formato de condición no proporciona la respuesta que solicitó, por lo que debe aparecer “una nota”.

Si tiene celdas adyacentes disponibles, simplemente colocaría una declaración IF junto a cada celda. Una vez creado el primero, se puede copiar y pegar al grupo.

Si su Columna B tiene los puntajes, entonces sus declaraciones IF pueden estar en la Columna C, así:

Nota: la fuente roja se agregó a toda la columna C para un efecto similar al formato condicional, pero esto se aplicó directamente. La instrucción IF solo permitirá que la nota aparezca cuando se cumple la condición (el valor de la celda es mayor que B1). El $ B $ 1 es para evitar que el valor cambie si copia / pega. Esto le permite cambiar el valor máximo permitido sin tener que cambiarlo en cada celda.

Hola,

Como dice Amit, el formato condicional será el camino a seguir porque es menos desalentador para la mayoría de las personas que escribir un código para crear un cuadro de mensaje. He incluido ejemplos de ambos aquí.

Aquí hay un ejemplo utilizando el formato condicional:

Tengo una lista de nombres y puntajes de estudiantes

Resalte todos los puntajes (o toda la columna en la que se ingresarán los puntajes). En la pestaña Inicio, haga clic en “Formato condicional”, desplace el mouse sobre “Reglas de resaltado de celdas” y seleccione “Más que …”

Aparecerá un cuadro que le permitirá especificar qué valor no se debe sobrepasar (la puntuación más alta posible) y qué color desea que gire la celda si se supera el valor. Aquí están los resultados en mi ejemplo (si la puntuación más alta es 1000):

Aquí hay un ejemplo utilizando el código VBA para crear un cuadro de mensaje:

Tengo la misma lista de nombres, pero he dejado las puntuaciones en blanco por ahora.

Mantenga presionada la tecla ALT en su teclado y presione F11 para abrir el editor de código. Haga doble clic en el nombre de la hoja que está utilizando (Hoja1 en mi ejemplo). Pega el siguiente código

Private Sub Worksheet_Change (ByVal Target As Range)
Dim A As Range
Establecer A = Rango (“B2: B2000”)
Si Intersect (Target, A) no es nada, entonces salga Sub
Si Target.Value> 1000 entonces
MsgBox “El puntaje excede 1000”
Terminara si
End Sub

Se verá así:

Con este código, cada vez que se ingrese un valor en una celda dentro del rango B2: B2000, aparecerá un cuadro de mensaje que dice “La puntuación excede 1000”.

Lo más simple que se puede hacer es el formato condicional.

En la celda (X, Y) (donde x & y puede ser cualquier cosa) puede escribir la puntuación máxima y luego el formato condicional que dice que más de $ Y $ X se vuelven rojos