Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Sélection plage cellules sous condition

  • Initiateur de la discussion Initiateur de la discussion famu
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

famu

XLDnaute Occasionnel
Bonjour,

Certainement un classique...mais je tourne en rond ! Voici mon problème :

UGP1
UGP1
UGP1
UGP2
UGP2
UGP2
UGP2
UGP2

Comment sélectionner les 3 cellules "UGP1" (en même temps) sachant qu'elles sont toujours dans la même colonne mais que leur nombre varie (3, 4, 5, ...)
Merci pour votre aide,
Famu.
 
Re : Sélection plage cellules sous condition

Bonjour Famu,

Je présume que si on répondait:" ... Ben, avec la souris!" tu trouverais ça un peu "basique", voire vexant 😛. En même temps, si tu ne précises pas plus, il y a différentes solutions ... dont les macros!

Tes valeurs sont dans des cellules contigües? Tu ne dois rechercher qu'une des valeurs ou les différentes valeurs successivement? Tu dois faire la manipulation 1 fois pas semaine ou toutes les 10 minutes? Tu as déjà essayé des choses? La valeur à rechercher figure dans une cellule? etc...
 
Re : Sélection plage cellules sous condition

J'ai fait un fichier...on ne peut plus simple.
Quand tu l'ouvriras, les cellules contenant "UGP1" seront déjà sélectionnées.
Ce que je voudrais, c'est d'avoir cette sélection via une Macro. Ensuite, je pourrai utiliser ce code pour l'intégrer dans une macro plus complète.
Merci d'avance pour ton aide.
 

Pièces jointes

Re : Sélection plage cellules sous condition

Rebonjour famu, Modeste,

Merci Modeste de nous avoir aiguillés sur ce fil.

La macro dans Module1 (Alt+F11) :

Code:
Sub Selectionne()
Dim txt As String, cel As Range, plage As Range
txt = "UGP1"
For Each cel In Range("A1", [A65536].End(xlUp))
  If UCase(cel) = txt Then _
    Set plage = Union(cel, IIf(plage Is Nothing, cel, plage))
Next
If Not plage Is Nothing Then _
  plage.Select: MsgBox "Nombre de zones : " & plage.Areas.Count
End Sub
Fichier .xls joint.

A+
 

Pièces jointes

- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

Réponses
40
Affichages
4 K
Réponses
2
Affichages
582
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…