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

Selcetion des lignes filtrées par une filtre automatique.

C

Chris

Guest
Bonjour le forum.


Ce forum est genial, grace aux exemple que je trouve et aux participant je peux apprendre le vba (pas facile quand meme) mais j'avance à petit pas.
Je ne pose plus mes probleme en une fois parce que des pros me fabriquent une macro super elaborée qui fonctionne tes bien mais je suis incapable de la modifiée ni de l'adaptée aux problemes et en plus je n'apprend pas comment ca fonctionne.

Apres avoir resolu des petits problemes des filtres elaboré en vba, je coince avec le filtre auto.

Ma question est :

Comment faire pour selectionner les lignes filtrées (celles qui aparaissent avec des numeros bleu)?

pour la suite je vais chercher un peut et je pense me debrouiller seul.


Merci d'avance.

Chris
 
J

Jeannot

Guest
Bonjour,

tu peux par un range sélectionner une cellule de zone filtrée, puis tu utilises

ActiveCell.CurrentRegion.Select

Toute ta zone résultat du filtre sera sélectionnée

A+

Jeannot
 
C

Chris

Guest
Merci Jeannot

Ca fonctionne nickel, mais le filtre auto reste activé sur la feuille et en utilisant AutoFilterMode = False ca ne le desactive pas.

Est ce que tu aurais une solution?


@+

Chris
 
J

Jeannot

Guest
Je pense qu'en intégrant l'instruction : Selection.Autofilter
excel désactivera le filtre si celui-ci est actif et inversement

je n'ai pas le temps de tester, je te laisse faire. Tiens moi au courant

Jeannot
 
C

Chris

Guest
Salut jeannot, salut le forum

Il me semblait bien que ça n'allait pas durer longtemps. un nouveau point de bloquage vient d'apparaitre (et je me doute que ce n'est pas fini).

Lorsque j'utilise la commande

ActiveCell.CurrentRegion.Select

Je selectionne toute la region avec les champs or j'utilise cette commande pour faire un couper / coller sur une autre feuille qui comporte deja des champs.

Comment faire pour eviter de selectionner les champs tout en selectionnant les lignes triées.


Sheets("Encours").Select
Range("a3").Select
Selection.AutoFilter Field:=8, Criteria1:="<>"
ActiveCell.CurrentRegion.Select
Selection.Copy
Sheets("Histogen").Select
Range("A8").End(xlDown)(2).Select
ActiveSheet.Paste
Sheets("Encours").Select
Selection.AutoFilter
Application.CutCopyMode = False


voila le code si ca peut vous aider


Merci d'avance.


Chris
 
J

Jeannot

Guest
Hello,

TU te possitionnes sur la première cellule à selectionner exemple A2

Range("A2").select
Range(Selection,Selection.End(xldown).select
Range(Selection,Selection.End(xlToRight).Select

Ces trois lignes te permettront de selectionner ta zone à récupérer

A+

Jeannot
 
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…