Macro détection de mots-clés - copie et comptage

Résolu
wuhrlinanthony Messages postés 52 Date d'inscription   Statut Membre Dernière intervention   -  
wuhrlinanthony Messages postés 52 Date d'inscription   Statut Membre Dernière intervention   -
Bonjour,

J'ai récemment commencer à apprendre le code VBA et j'ai déjà pu créer différentes macro plus ou moins grande selon les cas, mais là je tombe sur un gros problème car je ne sais pas par quoi commencer.

En clair, je cherche a créer une macro qui peut me détecter le Top 3 des mots les plus répandue dans un texte qui est écrit auparavant dans une cellule.

Et que cette macro puisse me copier ces trois mots dans une autre cellule et quelle me donne le nombre de fois chaque mots est répéter.

Merci d'avance.
A voir également:

4 réponses

ccm81 Messages postés 10909 Date d'inscription   Statut Membre Dernière intervention   2 433
 
Bonjour

Un exemple
http://www.cjoint.com/c/EGDncxLsygR

Cdlmnt
0
wuhrlinanthony Messages postés 52 Date d'inscription   Statut Membre Dernière intervention  
 
Merci beaucoup ccm81 ! C'est exactement ce que je cherchais.

Sans te mentir je ne comprend pas beaucoup ton code, c'est encore trop évolué pour mon petit niveau de débutant.

J'ai encore une question : Si par exemple je veux ajouter un mot en plus , passer du top 3 au top 4 des mots les plus répandus, ou dois-je modifier ton code ?

Merci d'avance.
0
ccm81 Messages postés 10909 Date d'inscription   Statut Membre Dernière intervention   2 433
 
Le même presque* où tu peux modifier le nombre de tops et avec quelques explications
http://www.cjoint.com/c/EGDn0SPG5zR


-* il y avait une erreur ici
  If dico.exists(cle) Then
dico(cle) = dico(cle) + 1
Else
dico.Add cle, 1
End If

Cdlmnt
0
wuhrlinanthony Messages postés 52 Date d'inscription   Statut Membre Dernière intervention  
 
Super merci beaucoup, je comprend un peu mieux ton code.
0