Nombre de mots dans un document excel
dodie78
Messages postés
9
Statut
Membre
-
via55 Messages postés 14730 Date d'inscription Statut Membre Dernière intervention -
via55 Messages postés 14730 Date d'inscription Statut Membre Dernière intervention -
Bonjour,
J'ai un document de 2 colonnes et de 29800 lignes. Je voudrais savoir combien de mots comporte mon document.
Dans ma première colonne, j'ai un mot :
yak
Dans la 2e colonne j'ai :
(4) Boeuf (6) Buffle, Karbau
Est-ce qu'Excel peut compter le nombre de mot en excluant les parenthèses et leur contenu et les virgules ?
D'avance merci.
E.
J'ai un document de 2 colonnes et de 29800 lignes. Je voudrais savoir combien de mots comporte mon document.
Dans ma première colonne, j'ai un mot :
yak
Dans la 2e colonne j'ai :
(4) Boeuf (6) Buffle, Karbau
Est-ce qu'Excel peut compter le nombre de mot en excluant les parenthèses et leur contenu et les virgules ?
D'avance merci.
E.
A voir également:
- Comment compter le nombre de mots dans un fichier excel
- Comment réduire la taille d'un fichier - Guide
- Comment ouvrir un fichier epub ? - Guide
- Fichier bin - Guide
- Nombre de jours entre deux dates excel - Guide
- Fichier rar - Guide
2 réponses
Bonsoir à vous deux
Raymond a raison il faut affiner l'analyse
A défaut un début de solution peut être par macro :
Sub compte()
t = 0
For x = 1 To 100
c = Application.Proper(Range("B" & x))
For n = 1 To Len(c)
If Asc(Mid(c, n, 1)) >= 65 And Asc(Mid(c, n, 1)) <= 90 Then t = t + 1
Next
Next x
MsgBox (t & " mots trouvés")
End Sub
La macro boucle sur les cellules 1 à 100 de la colonne B de la feuille dans laquelle on se trouve
Pour chaque cellule on applique la fonction Nom Propre (Application.Proper en VBA) qui met une majuscule au début de chaque mot (et ignore les parenthèses, chiffres et virgules)
La seconde boucle examine une par une toutes les occurrences de la chaine de caractères de la cellule et incrémente le compteur t lorsque le code du caractère est compris entre 65 et 90 (soit entre A et Z)
A la sortie le total correspond au nombre de mots dans la colonne
Avec cette macro panthère noire sera comptabilisé pour 2 mots mais crapaud-buffle pour 1 seul
Cdlmnt
"L'imagination est plus importante que le savoir." A. Einstein
Raymond a raison il faut affiner l'analyse
A défaut un début de solution peut être par macro :
Sub compte()
t = 0
For x = 1 To 100
c = Application.Proper(Range("B" & x))
For n = 1 To Len(c)
If Asc(Mid(c, n, 1)) >= 65 And Asc(Mid(c, n, 1)) <= 90 Then t = t + 1
Next
Next x
MsgBox (t & " mots trouvés")
End Sub
La macro boucle sur les cellules 1 à 100 de la colonne B de la feuille dans laquelle on se trouve
Pour chaque cellule on applique la fonction Nom Propre (Application.Proper en VBA) qui met une majuscule au début de chaque mot (et ignore les parenthèses, chiffres et virgules)
La seconde boucle examine une par une toutes les occurrences de la chaine de caractères de la cellule et incrémente le compteur t lorsque le code du caractère est compris entre 65 et 90 (soit entre A et Z)
A la sortie le total correspond au nombre de mots dans la colonne
Avec cette macro panthère noire sera comptabilisé pour 2 mots mais crapaud-buffle pour 1 seul
Cdlmnt
"L'imagination est plus importante que le savoir." A. Einstein
- si l'expression serait comptée pour 1 mot ou pour 2 mots,
- si l'expression serait comptée pour 1 mot ou pour 2 mots,
- quel est le maximum de mots pouvant figurer en deuxième colonne (3 dans ton exemple).