Discussion :

[musha76]

Bonjour à tous & bonne année

Je viens tout juste de m'intéresser au langage VBA (je programme dans d'autres langages), mais je bloque sur une requête...

Je possède un tableau avec deux colonnes : code postal et numéro

J'aimerais pour tous les numéros inférieurs ou égale à 8, afficher les codes postaux.

J'ai bien trouvé la formule pour compter le nombre de ligne inférieur ou égale à 8

Code :

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

=NB.SI(C2:C522;"<=8")

mais je ne sais pas comment afficher le code postal qui lui est associé.

j'ai utilisé la formule suivante :

Code :

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

=NB.SI(C2:C522;"<=8";"")

Mais j'obtiens un message d'erreur m'indiquant que j'ai entré un nombre trop important d'arguments pour cette fonction.

Merci par avance pour votre aide!

[Trystan441]

Bonjour Musha,

Pourquoi ne pas simplement utilisé une Mise en Forme Condionnelle ? Elle masquerait et montrerait les données dont tu as besoin

Bonne journée à toi,

[musha76]

Bonjour Trystan,

Comme je l'ai précise, je viens juste de découvrir la puissant de l'outil dont je ne suis pas familier.

Je vais chercher du côté des mises en forme condionnelle du coup ! Merci

[musha76]

Après plusieurs heure de recherche, voici la solution :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
Option Explicit
'----------------------------------------------------------------
Public Sub Masquer()
 
    Sheets(1).Select
        If Sheets(1).AutoFilterMode Then
            Sheets(1).AutoFilterMode = False
        End If
 
    Range("A1").CurrentRegion.Select
 
    With Selection
        .AutoFilter Field:=2, Criteria1:="<=8", Operator:=xlAnd
    End With
 
End Sub
'----------------------------------------------------------------
Public Sub Afficher()
 
    If Sheets(1).AutoFilterMode Then
        Sheets(1).AutoFilterMode = False
    End If
 
End Sub