Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Trouver des mots à partir des lettres

  • Initiateur de la discussion Initiateur de la discussion R@chid
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

R@chid

XLDnaute Barbatruc
Supporter XLD
Bonjour les amis,
je me permet de poser la question, espérant que ce que je veux soit réalisable sur Excel.
je veux un code VBA qui peut combiner des lettres pour faire des mots et d'en extraire juste les mots qui fonts partis du dictionnaire français.

je joins un fichier.

Merci d'avance
 

Pièces jointes

Re : Trouver des mots à partir des lettres


Bonjour !

Rachid, si tu disposes de Firefox ou de Thunderbird sur l'ordinateur,
tu peux directement utiliser le fichier texte de leur dictionnaire …

 
Re : Trouver des mots à partir des lettres

Bonsoir david84 🙂, R@chid 🙂, à tous,


J'ai construit la macro dans l'esprit du jeu télévisé "Des chiffres et des lettres" où on ne distingue pas les lettres accentuées des autres.

Si on veut tenir compte des lettres accentuées, il suffit de:

1) remplacer dans la macro :
VB:
Const avecAccent = "à â ä ç é è è ê ê ë ë ë î ï ô ö ù û ü"
Const SansAccent = "à â ä ç é è è ê ê ë ë ë î ï ô ö ù û ü"
par
VB:
Const avecAccent = ""
Const SansAccent = ""

2) rajouter les lettres accentuées minuscules dans la liste de validation nommée Alphabet

Errata : je viens de m'apercevoir qu'il y a des doublons dans la liste des lettres accentuées. On peut les ôter dans la constante avecAccent ainsi que leur lettre correspondante dans la constante sansAccent.

On devrait donc n'avoir que 15 lettres accentuées:

VB:
Const avecAccent = "â ä ç é è ê ë î ï ô ö ù û ü"
Const SansAccent = "a a c e e e e i i o o u u u"
 
Dernière édition:
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…