XL 2016 Comptage dans un tableau

Bruce68 · 10 Novembre 2018

Bonjour à tous
Je cherche quelle formule mettre pour compter dans une ligne d'un Tableau "Tableau(4,7)" ou il y aura Pr et Pa ou que Pr, j'ai essayé avec cette formule mais cela ne fonctionne pas je n'ai que le chiffre 1

Private Sub ComboBox1_Change()
For k = 1 To 7
If ComboBox1 = Tableau(1, k) Then
Tableau(2, k) = "Pr"
End If
Next k
For k = 1 To 7
If ComboBox2 = Tableau(1, k) Then
Tableau(2, k) = "Pa"
End If
Next k
Nbjoueur = Application.CountIf((Tableau(2, 7)), "><""")
End Sub

Je vous remercie de votre aide

Theze · 11 Novembre 2018

Bonjour,

J'ai un peu de peine à comprendre, tu cherches dans ton tableau si la valeur choisie dans le ComboBox s'y trouve ?
Regardes avec InStr() :

Code:

If InStr(ComboBox1.Text, Tableau(1, k)) > 0 Then
    Tableau(2, k) = "Pr"
End If

Bruce68 · 13 Novembre 2018

Bonsoir Theze et le forum
J'ai trouvé la solution pour compter Le nombre de Pr et de Pa en mettant une variable a

Private Sub ComboBox1_Change()
X = 1
For k = 1 To 7
If ComboBox1 = Tableau(1, k) Then
Tableau(2, k) = "Pr"
X = X +1
End If
Next k

For k = 1 To 7
If ComboBox2 = Tableau(1, k) Then
Tableau(2, k) = "Pa"
End If
X = X +1
Next k

End Sub

XL 2016 Comptage dans un tableau

Bruce68

XLDnaute Impliqué

Theze

XLDnaute Occasionnel

Bruce68

XLDnaute Impliqué

Discussions similaires