Leaderboard

Hola, Haplox, gracias por su aclaración y el tiempo para responder a mi declaración. Realmente no quería perderte En cuanto a mí, siempre has sido un maestro de la sabiduría y la programación. Es cierto, me encanta probar suerte en cosas que van un poco fuera de la caja. Pero cuánto: Durante años pasé horas y horas en varios foros en busca de esto o aquello. tLo que siempre he notado: además de encontrar miembros muy groseros en el diálogo con los demás; Con mucha frecuencia descubrí que las preguntas planteadas por los nuevos miembros eran en la práctica siempre repetitivas. Por eso

Este se va a convertir en un post multinacional @A.Maurizio 🤣. No sé si aun te entiendo, pero vamos allá: En el siguiente código, que está en el evento Change de la hoja Escribimos en alguna celda del range "I1:N1" un peso Compara ese valor con los de la columna "B", en este caso con un "threshold" de 1 sobre el valor introducido (si quisieras un "threshold" de 2, cambia a If Cells(i, 2) >= Target - 2) Si encuentra el valor, colorea de amarillo Si no es esto, espero que al menos te de la idea Private Sub Worksheet_Change(ByVal Target As Range) Dim uF&, i