OVH Cloud OVH Cloud

compter les lignes

10 réponses
Avatar
Pitalugue
bonjour

je souhaite compter les lignes d'un document.
J'ecris ceci.

Sub count()
Selection.WholeStory
ActiveDocument.ComputeStatistics (wdStatisticLines)
MsgBox (wdStatisticLines)
End Sub

mais c'est le delire complet , il me met ce qu'il veut.

D'autre part, comment compter le nombre de fois ou il y a le caractere ";"
par exemple ?

Merci de votre aide

Michel

10 réponses

Avatar
Lasperches Denis
Bonsoir
je souhaite compter les lignes d'un document.
J'ecris ceci.

Sub count()
Selection.WholeStory
ActiveDocument.ComputeStatistics (wdStatisticLines)
MsgBox (wdStatisticLines)
End Sub

mais c'est le delire complet , il me met ce qu'il veut.


Là pour cela, je ne sais pas !


D'autre part, comment compter le nombre de fois ou il y a le
caractere ";" par exemple ?


Rechercher ";" et remplacer par ";" remplacer tout et une message bos
indique le nombre de remplacements sans vraiment avoir rien remplacé...

Petit Denis

Avatar
AB
Bonsoir Pitalugue (t'es de Marseille aussi ?)
Denis a répondu pour la 2è partie de la question.
Pour la 1ère, essaie ça :
Sub compte()
MsgBox ActiveDocument.ComputeStatistics(Statistic:=wdStatisticLines,
IncludeFootnotesAndEndnotes:úlse) & " lignes"
End Sub
AB

Pitalugue wrote:
|| bonjour
||
|| je souhaite compter les lignes d'un document.
|| J'ecris ceci.
||
|| Sub count()
|| Selection.WholeStory
|| ActiveDocument.ComputeStatistics (wdStatisticLines)
|| MsgBox (wdStatisticLines)
|| End Sub
||
|| mais c'est le delire complet , il me met ce qu'il veut.
||
|| D'autre part, comment compter le nombre de fois ou il y a le
|| caractere ";" par exemple ?
||
|| Merci de votre aide
||
|| Michel
Avatar
nuindacil
Bonsoir,

Y a une petite macro toute faite dans la faq pour compter un mot quelconque

http://faq.ms.word.free.fr/VBA/VBA.htm

nuindacil
mvp word
http://faq.ms.word.free.fr

Lasperches Denis a écrit:
Bonsoir

je souhaite compter les lignes d'un document.
J'ecris ceci.

Sub count()
Selection.WholeStory
ActiveDocument.ComputeStatistics (wdStatisticLines)
MsgBox (wdStatisticLines)
End Sub

mais c'est le delire complet , il me met ce qu'il veut.



Là pour cela, je ne sais pas !


D'autre part, comment compter le nombre de fois ou il y a le
caractere ";" par exemple ?



Rechercher ";" et remplacer par ";" remplacer tout et une message bos
indique le nombre de remplacements sans vraiment avoir rien remplacé...

Petit Denis




Avatar
nuindacil
Bonsoir,

Y a une petite macro toute faite dans la faq pour compter un mot quelconque

http://faq.ms.word.free.fr/VBA/VBA.htm

nuindacil
mvp word
http://faq.ms.word.free.fr

Lasperches Denis a écrit:
Bonsoir

je souhaite compter les lignes d'un document.
J'ecris ceci.

Sub count()
Selection.WholeStory
ActiveDocument.ComputeStatistics (wdStatisticLines)
MsgBox (wdStatisticLines)
End Sub

mais c'est le delire complet , il me met ce qu'il veut.



Là pour cela, je ne sais pas !


D'autre part, comment compter le nombre de fois ou il y a le
caractere ";" par exemple ?



Rechercher ";" et remplacer par ";" remplacer tout et une message bos
indique le nombre de remplacements sans vraiment avoir rien remplacé...

Petit Denis




Avatar
nuindacil
Bonsoir,

Y a une petite macro toute faite dans la faq pour compter un mot quelconque

http://faq.ms.word.free.fr/VBA/VBA.htm

nuindacil
mvp word
http://faq.ms.word.free.fr

Lasperches Denis a écrit:
Bonsoir

je souhaite compter les lignes d'un document.
J'ecris ceci.

Sub count()
Selection.WholeStory
ActiveDocument.ComputeStatistics (wdStatisticLines)
MsgBox (wdStatisticLines)
End Sub

mais c'est le delire complet , il me met ce qu'il veut.



Là pour cela, je ne sais pas !


D'autre part, comment compter le nombre de fois ou il y a le
caractere ";" par exemple ?



Rechercher ";" et remplacer par ";" remplacer tout et une message bos
indique le nombre de remplacements sans vraiment avoir rien remplacé...

Petit Denis




Avatar
JièL Goubert
Euuuhh je voudrais pas dire, mais il me semble qu'il y a une petite
macro toute faite dans la faq pour compter un mot quelconque ;-)))

--
JièL Y_a_une_petite_macro_toute_
faite_dans_la_faq_pour_compter_un_mot_quelconque_mais_pas_les_clics

MDR

Bonsoir,

Y a une petite macro toute faite dans la faq pour compter un mot quelconque

http://faq.ms.word.free.fr/VBA/VBA.htm


Avatar
Pitalugue
bonjour

yes , de MARSEILLE.

merci pour tes infos , ca marche

et merci pour le lien vers la faq

Pitalugue

"AB" a écrit dans le message de news:

Bonsoir Pitalugue (t'es de Marseille aussi ?)
Denis a répondu pour la 2è partie de la question.
Pour la 1ère, essaie ça :
Sub compte()
MsgBox ActiveDocument.ComputeStatistics(Statistic:=wdStatisticLines,
IncludeFootnotesAndEndnotes:úlse) & " lignes"
End Sub
AB

Pitalugue wrote:
|| bonjour
||
|| je souhaite compter les lignes d'un document.
|| J'ecris ceci.
||
|| Sub count()
|| Selection.WholeStory
|| ActiveDocument.ComputeStatistics (wdStatisticLines)
|| MsgBox (wdStatisticLines)
|| End Sub
||
|| mais c'est le delire complet , il me met ce qu'il veut.
||
|| D'autre part, comment compter le nombre de fois ou il y a le
|| caractere ";" par exemple ?
||
|| Merci de votre aide
||
|| Michel




Avatar
JièL Goubert
Salut André

;-))

Bonsoir Pitalugue (t'es de Marseille aussi ?)


Avec un nom comme ça tu avais des doutes ? ;-)))))))))

le Pitalugue : un petit bateau pointu dont l'hélice est tellement grosse
que lorsqu'on démarre le moteur, c'est le bateau qui tourne (!)

Pitalugue : une embarcation pas fiable du tout
http://www.marseillais.org/dico.html

--
JièL Jobastre ;-)))

Avatar
AB
Non, pas vraiment, Jean-Louis
Mais je voulais m'assurer que c'était pas un usurpateur : y'a que les
marseillais qui ont droit à ce genre de pseudo, sinon, mdr...on n'est plus
chez nous :)
AB
JièL Goubert wrote:
|| Salut André
||
|| ;-))
||
||| Bonsoir Pitalugue (t'es de Marseille aussi ?)
||
|| Avec un nom comme ça tu avais des doutes ? ;-)))))))))
||
|| le Pitalugue : un petit bateau pointu dont l'hélice est tellement
|| grosse que lorsqu'on démarre le moteur, c'est le bateau qui tourne
|| (!)
||
|| Pitalugue : une embarcation pas fiable du tout
|| http://www.marseillais.org/dico.html
||
|| --
|| JièL Jobastre ;-)))
Avatar
Pitalugue
je suis pas un usurpateur, t'inquietes

Pitalugue

"AB" a écrit dans le message de news:

Non, pas vraiment, Jean-Louis
Mais je voulais m'assurer que c'était pas un usurpateur : y'a que les
marseillais qui ont droit à ce genre de pseudo, sinon, mdr...on n'est plus
chez nous :)
AB
JièL Goubert wrote:
|| Salut André
||
|| ;-))
||
||| Bonsoir Pitalugue (t'es de Marseille aussi ?)
||
|| Avec un nom comme ça tu avais des doutes ? ;-)))))))))
||
|| le Pitalugue : un petit bateau pointu dont l'hélice est tellement
|| grosse que lorsqu'on démarre le moteur, c'est le bateau qui tourne
|| (!)
||
|| Pitalugue : une embarcation pas fiable du tout
|| http://www.marseillais.org/dico.html
||
|| --
|| JièL Jobastre ;-)))