- Javascript : Script pour compter le nombre de fois que l'utiliseur a visiter le site - CodeS SourceS
- Compter le nombre de caractere de chaque mot d'une chaine
- Compter le nombre de fois qu'apparait un caractère dans un AnsiString
- Compter le nombre de fois d'une chaine de caractère dans une chaine
- Nombre d'occurence des termes d'un fichier texte
Compter le nombre de fois où un mot apparaît dans une colonne donnée [Résolu]
Signaler
nougitch
jrivet
- Messages postés
- 431
- Date d'inscription
- mercredi 22 octobre 2003
- Statut
- Membre
- Dernière intervention
- 17 novembre 2008
jrivet
- Messages postés
- 7393
- Date d'inscription
- mercredi 23 avril 2003
- Statut
- Membre
- Dernière intervention
- 6 avril 2012
A voir également:
- Compter le nombre de fois où un mot apparaît dans une colonne donnée
- Visual Basic / VB.NET : Lire un fichier texte et compter le nombre de fois que chaque lettre appara& - Guide
- Compter le nombre de fois ou un processus apparait ✓ - Forum - C++ & C++ .NET
- Compter le nombre d occurrence d'un mot python - Guide
- Compter le nombre de fois qu'une lettre se trouve dans un string - Codes sources - Visual Basic / VB.NET (Texte)
- Javascript : Script pour compter le nombre de fois que l'utiliseur a visiter le site - CodeS SourceS - Guide
9 réponses
jrivet
- Messages postés
- 7393
- Date d'inscription
- mercredi 23 avril 2003
- Statut
- Membre
- Dernière intervention
- 6 avril 2012
Salut,
Est ce que l'enregistreur de macro ne peut pas t'aider?
A l'aide d'une boucle et d'une mémorisation de la premiere ligne trouver (pour ne pas boucler infiniment).
Columns("B:B").Select
Selection.Find(What:="incident", After:=ActiveCell, LookIn:=xlValues, _
LookAt:=xlPart, SearchOrder:=xlByColumns, SearchDirection:=xlNext, _
MatchCase:=False).Activate
NOTE: B3 n'est pas une colonne..
@+, Ju£i?n
Est ce que l'enregistreur de macro ne peut pas t'aider?
A l'aide d'une boucle et d'une mémorisation de la premiere ligne trouver (pour ne pas boucler infiniment).
Columns("B:B").Select
Selection.Find(What:="incident", After:=ActiveCell, LookIn:=xlValues, _
LookAt:=xlPart, SearchOrder:=xlByColumns, SearchDirection:=xlNext, _
MatchCase:=False).Activate
NOTE: B3 n'est pas une colonne..
@+, Ju£i?n
mortalino
- Messages postés
- 6786
- Date d'inscription
- vendredi 16 décembre 2005
- Statut
- Membre
- Dernière intervention
- 21 décembre 2011
Salut,
Comme Julien te le précise, il faut utiliser l'instruction Find.
Après le Selection.Find(What:="incident", ... mettre
Find.Next (c'est ça qui devra être bouclé)
++
Comme Julien te le précise, il faut utiliser l'instruction Find.
Après le Selection.Find(What:="incident", ... mettre
Find.Next (c'est ça qui devra être bouclé)
++
jrivet
- Messages postés
- 7393
- Date d'inscription
- mercredi 23 avril 2003
- Statut
- Membre
- Dernière intervention
- 6 avril 2012
Salut,
Essaie ceci.
Dim NumFois As Long
Dim Li As Long
Dim Tmp As Long
Columns("B:B").Select
On Error Resume Next
Call Selection.Find(What:="incident", After:=ActiveCell, LookIn:=xlValues, _
LookAt:=xlPart, SearchOrder:=xlByColumns, SearchDirection:=xlNext, _
MatchCase:=False).Activate
If Err.Number = 91 Then
MsgBox "Pas trouver"
Call Err.Clear
Else
Li = ActiveCell.Row
If Li <> 0 Then NumFois = NumFois + 1
While Tmp <> Li
Selection.FindNext(After:=ActiveCell).Activate
Tmp = ActiveCell.Row
NumFois = NumFois + 1
Wend
MsgBox NumFois - 1
End If
On Error GoTo 0
<small> Coloration syntaxique automatique [AFCK]</small>
@+, Ju£i?n
Essaie ceci.
Dim NumFois As Long
Dim Li As Long
Dim Tmp As Long
Columns("B:B").Select
On Error Resume Next
Call Selection.Find(What:="incident", After:=ActiveCell, LookIn:=xlValues, _
LookAt:=xlPart, SearchOrder:=xlByColumns, SearchDirection:=xlNext, _
MatchCase:=False).Activate
If Err.Number = 91 Then
MsgBox "Pas trouver"
Call Err.Clear
Else
Li = ActiveCell.Row
If Li <> 0 Then NumFois = NumFois + 1
While Tmp <> Li
Selection.FindNext(After:=ActiveCell).Activate
Tmp = ActiveCell.Row
NumFois = NumFois + 1
Wend
MsgBox NumFois - 1
End If
On Error GoTo 0
<small> Coloration syntaxique automatique [AFCK]</small>
@+, Ju£i?n
nougitch
- Messages postés
- 431
- Date d'inscription
- mercredi 22 octobre 2003
- Statut
- Membre
- Dernière intervention
- 17 novembre 2008
Merci beaucoup,
C'est exact, je voulais dire B, pardon.
C'est en effet la fonction qu'il me faut :D
Mais comment compter le nombre de fois où il est trouvé ?
Je dois bidouiller une sorte de compteur ou il existe une fonction ?
Merci encore.
C'est exact, je voulais dire B, pardon.
C'est en effet la fonction qu'il me faut :D
Mais comment compter le nombre de fois où il est trouvé ?
Je dois bidouiller une sorte de compteur ou il existe une fonction ?
Merci encore.
nougitch
- Messages postés
- 431
- Date d'inscription
- mercredi 22 octobre 2003
- Statut
- Membre
- Dernière intervention
- 17 novembre 2008
C'est excellent,
Merci mille fois les gars !!!
Toujours là pour aider, c'est gentil, c'est cool
Sûrement à bientôt !!!
Merci mille fois les gars !!!
Toujours là pour aider, c'est gentil, c'est cool
Sûrement à bientôt !!!
cs_MPi
- Messages postés
- 3877
- Date d'inscription
- mardi 19 mars 2002
- Statut
- Membre
- Dernière intervention
- 23 août 2018
Salut,
Une simple formule ne pourrait pas suffire ?
NB.SI(B:B;"*incident*")
MPi
Une simple formule ne pourrait pas suffire ?
NB.SI(B:B;"*incident*")
MPi
Molenn
- Messages postés
- 797
- Date d'inscription
- mardi 7 juin 2005
- Statut
- Membre
- Dernière intervention
- 23 février 2011
Je n'osais pas le dire, et comme je venais de mettre des formules dans 2 autres posts
Bien content que quelqu'un d'autre s'y soit collé
Molenn
Bien content que quelqu'un d'autre s'y soit collé
Molenn
cs_MPi
- Messages postés
- 3877
- Date d'inscription
- mardi 19 mars 2002
- Statut
- Membre
- Dernière intervention
- 23 août 2018
Molenn, je pensais justement à toi en répondant... ¦¬)
MPi
MPi
jrivet
- Messages postés
- 7393
- Date d'inscription
- mercredi 23 avril 2003
- Statut
- Membre
- Dernière intervention
- 6 avril 2012
Re,
>528680 Molenn, =6078 MPi: je savais (je supposais) qu une formule existait pour faire cela, mais je ne connais pas assez Excel pour la donner, donc je propose ce que je sais faire (mais cela Molenn le savais déjà)
En plus en sachant que vous n'êtes jamais loin je savais que cela ne valais pas la peine de passer trois 3 heures a chercher la formule alors que vous vous la donner en 5 minutes même pas.
@+, Ju£i?n
>528680 Molenn, =6078 MPi: je savais (je supposais) qu une formule existait pour faire cela, mais je ne connais pas assez Excel pour la donner, donc je propose ce que je sais faire (mais cela Molenn le savais déjà)
En plus en sachant que vous n'êtes jamais loin je savais que cela ne valais pas la peine de passer trois 3 heures a chercher la formule alors que vous vous la donner en 5 minutes même pas.
@+, Ju£i?n