Compter nombre de ligne ou colonne A = "x" Résolu

Question

Bonjour, 

Bonjour,
Comme le titre l'indique je cherche à compter le nombre de ligne où la cellule = x.
J'ai mis ce code mais çà ne fonctionne pas où çà coince ?

For i = 1 To ligne_FICHE_total
    If (onglet_Fiche.Columns("A") = "x") Then
        ligne_FICHE = ligne_FICHE + 1
    End If
Next

Configuration: Windows / Chrome 63.0.3239.132

cs_Le Pivert · Answer

Bonjour,

voir ceci:

https://www.developpez.net/forums/d605223/logiciels/microsoft-office/excel/contribuez/boucles-parcourir-colonne-ligne-plage-donnees-2-methodes/ 
 

Ce qui donne cela:

Sub For_X_to_Next_Ligne()
Dim FL1 As Worksheet, NoCol As Integer
Dim NoLig As Long, Var As Variant
Dim nombre As Integer
    Set FL1 = Worksheets("Feuil1")
    NoCol = 1 'lecture de la colonne 1
    For NoLig = 1 To Split(FL1.UsedRange.Address, "$")(4)
        Var = FL1.Cells(NoLig, NoCol)
        If Var = "x" Then
        nombre = nombre + 1
        End If
    Next
    MsgBox nombre
    Set FL1 = Nothing
End Sub

bidounet84 · Answer

Merci pour la solution

Compter nombre de ligne ou colonne A = "x"

2 réponses

Discussions similaires

Newsletters