MACRO : Compteur automatique Résolu

Question

Bonjour,


Je reviens vers votre savoir afin de m'aider à finir mon (super) tableau de suivi.


Cette fois je souhaiterais créer un compteur qui comptabilise le nombre de ligne avec une référence spéciale dans une colonne donnée.

En gros ; un compteur de lignes relié à une liste déroulante comprenant les (5) différents statuts et quand je sélectionne le statut voulu, le nombre de ligne avec ce statut s'affiche.


J'espère avoir été assez clair. :)



Cordialement,

Awzgg

PapyLuc51 · Accepted Answer

Bonjour,

Je ne vois pas l'intérêt d'un code VBA pour si peu ; NB.SI() fait ça très bien, enfin si j'ai bien saisi ta demande.

Cordialement

cs_Le Pivert · Answer

Bonjour,

Voici un exemple en vba à adapter:

Sub For_X_to_Next_Ligne()
Dim FL1 As Worksheet, NoCol As Integer
Dim NoLig As Long, Var As Variant
Dim nom As String
Dim ligne As Integer
nom = InputBox("Saisie du nom a rechercher : ", "NOM")
    Set FL1 = Worksheets("Feuil1")
    NoCol = 1 'lecture de la colonne A
    For NoLig = 1 To Range("A" & Rows.Count).End(xlUp).Row 'dernière ligne colonne A
     Var = FL1.Cells(NoLig, NoCol)
  If Var = nom Then
          ligne = ligne + 1
             End If
            Next
    Set FL1 = Nothing
  MsgBox ligne
End Sub


Il faudra changer l'inputBox par la valeur de ta ComboBox

Awazagaga · Answer

Bonjour à vous deux,


Je vous remercie pour les réponses. 
Effectivement j'ai réussi avec une formule en NB.SI. 

Explications : 

Sur une cellule j'ai installé la formule en y mettant la colonne dans laquelle je voulais faire la recherche.
Sur une autre cellule au dessus j'ai fait une liste avec les critères que je veux sélectionner.

Dans la formule, comme critère, je recherche la cellule avec la liste et le tour est joué. C'est tout simple finalement.


Maintenant j'essaie de rendre les cellules non dépendantes car il y a des colonnes cachées et ça me fait bouger ma recherche constamment ..


Bref merci encore Le Pivert et PapyLuc51 !


Cdlt,


Awzgg

MACRO : Compteur automatique

3 réponses

Discussions similaires

Newsletters