XL 2010 macro pour sélectionner des données

steph_29120 · 22 Juin 2023

Re-bonjour,

encore moi !

je cherche une macro qui sélectionnerai toutes les cellules contenant les même données (chaine de caractères) et qui les colorisent juste le temps de sélection.
Par exemple tous les PT. Puis tous les S ainsi de suite...

Cousinhub · 22 Juin 2023

Hello,
Re-,
Dans ce fichier, juste une ligne de code (dans les évènements de la Feuil1) pour calculer lors d'un changement de sélections de cellule
Et une Mise En Forme Conditionnelle qui concerne les cellules du tableau
Dans cette MEFC, une formule :

VB:

=A1=CELLULE("contenu")

A adapter
Le fichier
PS, lors d'une de tes dernières demandes, tu postais sous Excel 2016, et ici, 2010????
PS2, ici, je ne sélectionne pas les cellules identiques, je ne fais que les colorier....

steph_29120 · 22 Juin 2023

nickel super génial !
Par contre il ne faut pas me donner trop de bonnes réponses je risque d'en redemander

Cousinhub · 22 Juin 2023

Bah, entre 29N et 29S, on peut s'entraider, kan mêm!

steph_29120 · 12 Juillet 2023

Bonjour,
@Cousinhub la MEFC conditionnelle fonctionnait dans l'exemple mais pas dans le classeur "final".
il faut désormais double cliquer dans une cellule vide puis venir dans une cellule dont on souhaite sélectionner le texte.
De plus la mise en forme ne s'annule plus quand on clique dans une autre cellule.

J'espère avoir été le plus clair possible.
ci-joint le fichier final !
merci et bonne journée
Stéphane

Cousinhub · 12 Juillet 2023

Bonjour,
Effectivement, j'avais oublié de préciser que mon exemple comportait une formule qui ne se met à jour qu'à un évènement provoquant un re-calcul dans l'onglet.
Cette mise à jour se fait donc lorsqu'on modifie une cellule (ou qu'on appuie sur la touche F9)
Pour forcer ce calcul, il faut donc mettre un code lorsqu'on change de sélection de cellule
Le code pour la mise jour se situe dans l'évènement de feuille (clic droit sur le nom de l'onglet, "Visualiser le code"
Il faut donc que le fichier soit enregistré en ".xlsm" (Fichier prenant en charge les macros).

VB:

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Calculate
End Sub

Ton fichier modifié, et enregistré en ".xlsm"
Bonne fin d'apm

steph_29120 · 13 Juillet 2023

Cousinhub à dit:
Bonjour,
Effectivement, j'avais oublié de préciser que mon exemple comportait une formule qui ne se met à jour qu'à un évènement provoquant un re-calcul dans l'onglet.
Cette mise à jour se fait donc lorsqu'on modifie une cellule (ou qu'on appuie sur la touche F9)
Pour forcer ce calcul, il faut donc mettre un code lorsqu'on change de sélection de cellule
Le code pour la mise jour se situe dans l'évènement de feuille (clic droit sur le nom de l'onglet, "Visualiser le code"
Il faut donc que le fichier soit enregistré en ".xlsm" (Fichier prenant en charge les macros).

VB:

Private Sub Worksheet_SelectionChange(ByVal Target As Range) Calculate End Sub

Ton fichier modifié, et enregistré en ".xlsm"
Bonne fin d'apm

bonjour @Cousinhub

merci beaucoup et bonne journée.

STéphane

XL 2010 macro pour sélectionner des données

steph_29120

XLDnaute Junior

Pièces jointes

Cousinhub

XLDnaute Barbatruc

Pièces jointes

steph_29120

XLDnaute Junior

Cousinhub

XLDnaute Barbatruc

steph_29120

XLDnaute Junior

Pièces jointes

Cousinhub

XLDnaute Barbatruc

Pièces jointes

steph_29120

XLDnaute Junior

Discussions similaires