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

Pointer une liste Au secour

  • Initiateur de la discussion Initiateur de la discussion vinz602
  • 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 !

V

vinz602

Guest
Bonjour a tous
ci joint vous trouverez le fichier en question
sur ma feuille Etiquette

il suffit de selectionner un carton exemple 16 puis entree un filtre est appliquer puis une impression est faite (elle a étais retirer a l'heure actuel)
si vous taper 26 il y a plusieurs ligne


je souhaiterai pointer les cartons, dans ce fichier je me sert d'un double clic pour marquer "OK" donc pointer et je voudrai l'inclure avec mon premier entree
et pointer tous les carton de la selection ..

Pouvez vous m'aider SVP
Merci
 

Pièces jointes

Re : Pointer une liste Au secour

Bonjour Vinz602,

Si j'ai bien compris le problème, essaye en rajoutant le code suivant dans la macro Test1:

Code:
...
For Each cell In Range("$N10:$N34").SpecialCells(xlCellTypeVisible)
    cell.Value = "OK"
Next cell
...

@+

Gael
 
Re : Pointer une liste Au secour

Bonjour à tous,

Peux-tu essayer avec :

Code:
Sub Test1()
    Range("E9:K200").AdvancedFilter Action:=xlFilterInPlace, CriteriaRange:= _
        Range("H2:H3"), Unique:=False
Range("N10:N200") = "OK"

End Sub

A+

Edition : Bonjour Gael
 
- 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
Assurez vous de marquer un message comme solution pour une meilleure transparence.
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…