Celdas resaltadas según un TextBox

Hola,

Creo que utilizando simplemente un Formato condicional (tomando: Fórmula) deberías poder hacer lo que deseas de manera bastante sencilla...
https://support.microsoft.com/fr-fr/office/appliquer-la-mise-en-forme-conditionnelle-pour-faire-ressortir-des-informations-fed60dfa-1d3f-4e13-9ecb-f1951ff89d7f?ui=fr-fr&rs=fr-fr&ad=fr

• Quizás primero debas recuperar el valor seleccionado de tu listbox y ponerlo en una celda (por ejemplo, en A1) para poder usarlo luego en la fórmula.

Si no, a través de macro,
sigue existiendo la posibilidad de usar el método FINDALL
https://forums.commentcamarche.net/forum/affich-37621992-methode-find-dans-vba-recherche-de-donnees-sous-excel#findall

• Tendrás que modificar un poco el código para almacenar, para cada resultado, la fila (que ya se está haciendo) Y la columna.

Algo así

 'redimensionamiento del array ReDim Preserve arMatches(1 To 2,1 to iArr) 'Adición de la información arMatches(0,iArr) = rFnd.Row ' fila arMatches(1,iArr) = rFnd.Column ' columna 

o si no usa directamente la dirección (en lugar de separar fila y columna)

 ReDim Preserve arMatches(iArr) arMatches(iArr) = rFnd.Address ' será de la forma $A$1 por ejemplo 

Solo te quedará hacer un bucle sobre el array (que contiene la lista de celdas correspondientes al valor buscado) utilizando un bucle FOR para aplicar el formato deseado.

• • Encontrarás todo lo que necesitas sobre los "array" en el sitio: https://silkyroad.developpez.com/vba/tableaux/#LII-C
    • En cuanto al formato... te dejo utilizar tu grabador de macros para ver el código a aplicar.

--
Atentamente,
Jordane