Programme pour chercher les mots récurrents

Programme pour chercher les mots récurrents - Logiciels - Windows & Software

Marsh Posté le 04-07-2006 à 10:34:32    

Bonjour à tous,
Je suis a la recherche d'un programme ou utilitaire qui me permettrait de trouver les mots les plus recurrents dans un documents word ou html (peut importe)
Merci de votre aide.

Reply

Marsh Posté le 04-07-2006 à 10:34:32   

Reply

Marsh Posté le 05-07-2006 à 09:40:04    

up! ???

Reply

Marsh Posté le 06-07-2006 à 10:17:59    

tjrs personne ?? A croire que ce genre de programme n'existe pas, je vais devoir sortir un programme sous VB si ça continue .... :p

Reply

Marsh Posté le 10-07-2006 à 15:49:18    

Bonjour,
 
Laisse nous respirer un peu: vacances= il fait chaud, un peu de nage, un peu de bronzage et en plus les Bleus ont perdu.
Bon bref de commentaires.
 Je ne connais pas d'utilitaires et j'ai bien l'impression qu'il va falloir effectivement sortir un programme.
 
Tu es sur Word:
 
 
Sub Macro()
For i = 1 To nombre
    Selection.MoveRight Unit:=wdWord, Count:=1, Extend:=wdExtend
    Selection.MoveRight Unit:=wdCharacter, Count:=1
    Selection.TypeParagraph
    Next i
    Selection.WholeStory
    Selection.ConvertToTable Separator:=wdSeparateByParagraphs, NumColumns:=1, _
         NumRows:=385, AutoFitBehavior:=wdAutoFitFixed
    With Selection.Tables(1)
        .Style = "Grille du tableau"
        .ApplyStyleHeadingRows = True
        .ApplyStyleLastRow = True
        .ApplyStyleFirstColumn = True
        .ApplyStyleLastColumn = True
    End With
    Selection.Sort ExcludeHeader:=False, FieldNumber:="Colonne 1", _
        SortFieldType:=wdSortFieldAlphanumeric, SortOrder:=wdSortOrderAscending, _
        FieldNumber2:="", SortFieldType2:=wdSortFieldAlphanumeric, SortOrder2:= _
        wdSortOrderAscending, FieldNumber3:="", SortFieldType3:= _
        wdSortFieldAlphanumeric, SortOrder3:=wdSortOrderAscending, Separator:= _
        wdSortSeparateByCommas, SortColumn:=False, CaseSensitive:=False, _
        LanguageID:=wdFrench, SubFieldNumber:="Paragraphes", SubFieldNumber2:= _
        "Paragraphes", SubFieldNumber3:="Paragraphes"
End Sub
 
Ce code te permet de créer une colonne avec un mot par ligne (chaque mot du texte). En outre, la colonne est triée. Tu la copies et tu fais un collage sur Excel. Là, tu fais un tableau croisé dynamique.
Attention, je ne connais pas le nombre dans l'expression: For i=1 To...
Je le fais à tâtons. Si le texte n'est pas trop long, OK sinon, bon courage l'ami.
De plus, tu vas te trouver avec des lignes vides, des lignes contenant les signes de ponctuation...

Reply

Marsh Posté le 11-07-2006 à 09:37:26    

Impressive ! :jap:  
Je vais tester tout ça et vous tiendrez au courant
Merci

Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed