Comptage des mots

Le
Traducteur
Pouvez-vous me dire SVP s'il y a un moyen de compter les mots sur excel
(comme avec "statistiques" sur Word) ? Merci d'avance.
Vidéos High-Tech et Jeu Vidéo
Téléchargements
Vos réponses
Gagnez chaque mois un abonnement Premium avec GNT : Inscrivez-vous !
Trier par : date / pertinence
AV
Le #4943431
Les mots sont séparés par 1 espace et il peut y en avoir plusieurs par cellule
Compter les mots contenus dans le classeur :

Sub Compt_Mot()
On Error Resume Next
For i = 1 To ActiveWorkbook.Sheets.Count
For Each c In Sheets(i).Cells.SpecialCells(xlCellTypeConstants, 23)
x = c.Value
nbr = nbr + Len(x) - Len(Application.Substitute(x, " ", "")) + 1
Next
Next
MsgBox nbr
End Sub

AV
Publicité
Poster une réponse
Anonyme