View original (French)

Celdas resaltadas según un TextBox

Wyrgle Mensajes publicados 4 Estado Membre -  
jordane45 Mensajes publicados 30426 Fecha de registro   Estado Modérateur Última intervención   -
Hola a todos,

Aquí está mi problema: tengo una lista de usuarios en un TextBox. Cada usuario está vinculado a varias referencias que se enumeran en la hoja 'Principal'.
¿Es posible resaltar (fuente en negrita o color temporal de la celda) todas las referencias vinculadas a un usuario elegido en el TextBox?

Una captura de pantalla para ayudarme a entender (¡espero!)



¡Gracias por su ayuda!
Wyrgle

1 réponse

Réponse 1 / 1
jordane45 Mensajes publicados 30426 Fecha de registro   Estado Modérateur Última intervención   4 830
 
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.

--
Atentamente,
Jordane
0