Discussion :

[RomBon]

Bonjour,
Je bloque sur un problème (assez simple je pense...) de tri de critères :
Une colonne Type, avec 4 critères sélectionnables. L'utilisateur peut choisir d'afficher un ou plusieurs de ces critères.
J'utilise un filtre élaboré pour la suite de ma macro et par conséquent je ne dois pas avoir de cases vides entre 2 critères, sauf que je n'arrive pas à coder cette partie.
Le fichier excel en pj sera plus clair.

Merci

[Philippe Tulliez]

Bonjour,
Pourquoi n'affiche-tu pas une image de ta feuille contenant tes critères en expliquant ce que tu souhaites obtenir ?
Un forum a pour but de partager des questions et réponses que chacun peut lire depuis ce site. Proposer d'emblée un classeur à télécharger coupe tout partage et est assimilé pour moi à un aparté.
De plus tu te coupes de réponses potentiellement intéressantes des personnes qui ne télécharge jamais les classeurs proposés dès l'ouverture d'une discussion.

[RomBon]

Le programme que j'utilise est utilisé en interne et est contient pas mal de données confidentielles, raison pour laquelle je ne peux pas me permettre de le diffuser librement sur un forum...Sinon effectivement cela aurait été plus simple pour moi et pour vous.

[Philippe Tulliez]

Bonjour,
Mais place l'image de la feuille que tu proposes en téléchargement.

[RomBon]

De ce style ?

[Nico Chg]

Plutôt comme ça je pense

[Philippe Tulliez]

Bonjour,
Nicolas a très bien compris

[RomBon]

Bon merci à toi Nicolas, autant pour moi.
Mais je ne vois pas l'interêt de l'image, ça me semble plus facile à travailler sur excel, bref.
Du coup vous auriez une idée de code pour résoudre le pb ?

[Philippe Tulliez]

Bonjour,
Tu dis utiliser le filtre élaboré. Dans un filtre élaboré, il y a au moins deux zones, la zone des critères et la zone des données.
L'image correspond je suppose à la zone des données ?
Que faut-il dans la zone des critères et qu'attends-tu exactement puisque tu parles de boucles dans cette demande ?

Une colonne Type, avec 4 critères sélectionnables. L'utilisateur peut choisir d'afficher un ou plusieurs de ces critères.

Comment vois-tu le choix de l'utilisateur ?

Alors je vais déjà essayer de deviner ce que tu attends.
Comme expliqué plus haut, le filtre avancé ou élaboré d'excel est basé sur au moins deux zones, la zone des données et la zone des critères.
Dans le cas qui nous occupe je vois deux possibilités pour gérer cette zone des critères que nous appellerons areaCriteria qui aurait plusieurs choix portés sur les types (1, 2, 3, 4, etc.)
Si le nombre de cas possibles est limité, je créerais des plages nommées par exemple Cas_1, Cas_2, etc. Avec une portabilité limitée à la feuille (pour l'exemple [ParamFiltre])
Avec ce code

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
Sub CreateAreaCriteria_1()
 Dim areaCriteria As Range
 Set areaCriteria = ThisWorkbook.Worksheets("ParamFiltre").Range("cas_1")
End Sub

Une autre possibilité est de nommer une plage de deux colonnes avec en colonne 1 les critères et en colonne 2, la valeur booléenne VRAI ou FAUX où une procédure remplira la liste de la plage areaCriteria si la valeur est VRAI
Avec ce code

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
Sub CreateAreaCriteria_2()
 Dim rngCriteriaList As Range, areaCriteria As Range, r As Long, Count As Integer
 With ThisWorkbook.Worksheets("ParamFiltre")
  Set rngCriteriaList = .Range("CriteriaList")
  Set areaCriteria = .Range("A1")
 End With
 With rngCriteriaList
  For r = 1 To .Rows.Count
   If .Cells(r, 2) Then Count = Count + 1: areaCriteria.Offset(Count) = .Cells(r, 1)
  Next
 End With
 Set areaCriteria = areaCriteria.Resize(Count + 1)
 Debug.Print areaCriteria.Address
End Sub

D'autres possibilités existent comme par exemple les critères calculés

[Nico Chg]

Mais je ne vois pas l'interêt de l'image, ça me semble plus facile à travailler sur excel, bref.

Un forum a pour but de partager des questions et réponses que chacun peut lire depuis ce site. Proposer d'emblée un classeur à télécharger coupe tout partage et est assimilé pour moi à un aparté.
De plus tu te coupes de réponses potentiellement intéressantes des personnes qui ne télécharge jamais les classeurs proposés dès l'ouverture d'une discussion.

Je suis désolé, je ne suis pas aussi devin que Philippe Tulliez, sur quelle colonne ne doit tu pas avoir de case vide ? La colonne ou se trouve les types (Colonne A sur l'image) ?
Si case vide il y a, que veux tu faire ? Supprimer la ligne ? La remplir avec un type par défaut ?

[RomBon]

Je crée ma plage de critères après avoirfait le tri, merci je pense essayer la 1ere solution qui parait effectivement plus appropriée.

[Philippe Tulliez]

Bonjour,
En utilisant le principe des plages nommées Cas_1, Cas_2, tu peux aussi utiliser un questionnaire destiné à l'utilisateur et qui serait basé sur la fonction native d'Excel INDIRECT.
Un exemple se trouve dans le classeur téléchargeable qui accompagne le tutoriel Les filtres avancés ou élaborés dans Excel et expliqué dans le chapitre XIII. Sky is the limit