Compter ligne selon valeur de la colonne
Fermé
New_VBA_User
Messages postés
82
Date d'inscription
mardi 27 août 2019
Statut
Membre
Dernière intervention
3 octobre 2019
-
16 sept. 2019 à 16:27
New_VBA_User Messages postés 82 Date d'inscription mardi 27 août 2019 Statut Membre Dernière intervention 3 octobre 2019 - 17 sept. 2019 à 17:01
New_VBA_User Messages postés 82 Date d'inscription mardi 27 août 2019 Statut Membre Dernière intervention 3 octobre 2019 - 17 sept. 2019 à 17:01
A voir également:
- Compter ligne selon valeur de la colonne
- Déplacer une colonne excel - Guide
- Aller à la ligne excel - Guide
- Partage de photos en ligne - Guide
- Formule somme excel colonne - Guide
- Trier colonne excel - Guide
2 réponses
Zoul67
Messages postés
1959
Date d'inscription
lundi 3 mai 2010
Statut
Membre
Dernière intervention
30 janvier 2023
149
17 sept. 2019 à 09:21
17 sept. 2019 à 09:21
Bonjour,
Suivant le même principe que dans https://forums.commentcamarche.net/forum/affich-36211123-trouver-des-meme-mot-et-afficher-dans-textbox#p36215347 ...
Si tu devais le faire par formule, la fonction NB.SI.ENS et la fonction SOMMEPROD peuvent servir.
En VBA tu peux utiliser Application.WorksheetFunction pour y faire appel. Fais un enregistrement de macro pour obtenir la syntaxe.
A+
Suivant le même principe que dans https://forums.commentcamarche.net/forum/affich-36211123-trouver-des-meme-mot-et-afficher-dans-textbox#p36215347 ...
Si tu devais le faire par formule, la fonction NB.SI.ENS et la fonction SOMMEPROD peuvent servir.
En VBA tu peux utiliser Application.WorksheetFunction pour y faire appel. Fais un enregistrement de macro pour obtenir la syntaxe.
A+
f894009
Messages postés
17231
Date d'inscription
dimanche 25 novembre 2007
Statut
Membre
Dernière intervention
28 janvier 2025
1 712
17 sept. 2019 à 16:09
17 sept. 2019 à 16:09
Bonjour a vous tous,
J'utilise une autre logique etant donne qu'il y a de trous colonne C. Compter les YES colonne G et voir ce qu'il y a dans la colonne C
J'utilise une autre logique etant donne qu'il y a de trous colonne C. Compter les YES colonne G et voir ce qu'il y a dans la colonne C
Private Sub UserForm_Initialize()
With Worksheets("Sheet1")
Set Plage = .Range("G2:G" & .Range("G" & Rows.Count).End(xlUp).Row)
NBYES = Application.CountIf(Plage, "YES")
If NBYES > 0 Then
B101 = 0
B102 = 0
lig = 1
For n = 1 To NBYES
lig = .Columns(7).Find("YES", .Cells(lig, 7), , xlWhole).Row
If .Cells(lig, 3) = "B101" Then
B101 = B101 + 1
ElseIf .Cells(lig, 3) = "B102" Then
B102 = B102 + 1
Else
End If
Next n
TextBox1 = B101
TextBox2 = B102
Else
MsgBox "Pas de YES............."
End If
End With
End Sub
New_VBA_User
Messages postés
82
Date d'inscription
mardi 27 août 2019
Statut
Membre
Dernière intervention
3 octobre 2019
1
17 sept. 2019 à 17:01
17 sept. 2019 à 17:01
Merci,
ça marche bien.
bonne journée.
ça marche bien.
bonne journée.
17 sept. 2019 à 09:35
Dim dl As Integer With Sheets("Feuil3") dl = .Range("C" & Rows.Count).End(xlUp).Row TextBox1.Value = Application.WorksheetFunction.CountIfs(Range("C2:C" & dl), "B101", Range("G2:G" & dl), "YES") TextBox2.Value = Application.WorksheetFunction.CountIfs(Range("C2:C" & dl), "B102", Range("G2:G" & dl), "YES") End With