Convertir un nombre en lettres sur Word avec VBA

 Comment convertir un nombre en lettres sur Microsoft Word en utilisant une macro ?


Dans ce tutoriel, vous allez découvrir comment convertir facilement et rapidement, un nombre en lettres sur Microsoft Word, en utilisant une macro.

🎯 Ainsi, en enregistrant cette macro ou code VBA, vous allez pouvoir retranscrire autant de fois que vous le souhaitez des nombres en lettres.

🠞 De plus, en insérant un raccourci dans votre barre d'outils d'accès rapide,

👍vous gagnez du temps, 

✅ pour obtenir instantanément la retranscription d'un nombre en lettres,
     et ce, 
sur tous vos documents Word, même sur ceux déjà enregistrés.


A la fin de cette vidéo, vous serez :

  • Insérer la macro pour écrire un nombre en lettres
  • Utiliser le raccourci clavier pour enregistrer votre document "prenant en charges les macros"
  • Ajouter un raccourci dans la barre d'outils d'accès rapide pour exécuter la macro
  • Convertir un nombre en lettres
  • Écrire un nombre en lettres supérieur à 999 999
  • Rendre votre macro disponible sur tous vos documents Word

Voir la vidéo pour suivre les différentes étapes

Découvrez comment convertir instantanément un nombre en lettres sur Microsoft Word

Pour vous entraîner à convertir un nombre en lettres :
-> Télécharger le document Word utilisé dans la vidéo



📌↪️ Code VBA à utiliser :

Sub Nombre_en_Lettres()

    Dim numero As String

    numero = InputBox("Noter le nombre à convertir")

    Selection.Fields.Add Range:=Selection.Range, Type:=wdFieldEmpty, Text:= _

        "= " & numero & "\*cardtext", PreserveFormatting:=True

End Sub


🠞 Il existe une autre méthode pour convertir un nombre en lettres, mais elle demande plus de manipulations.

Pour les personnes qui voudrait l'utiliser, voici les différentes étapes à suivre, pour retranscrire par exemple 380 en lettres :

  • Vous appuyez simultanément sur les touches CTRL + la touche F9, ce qui vous affiche {}
  • Ensuite, vous faites un clic gauche entre les deux accolades et vous notez =380\*cardtext
  • Et pour finir, selon votre ordinateur, vous appuyez sur la touche F9 ou simultanément sur les touches fn + F9 pour obtenir le nombre en lettres.
  • Et vous répétez ces actions, si vous avez besoin d'écrire d'autres nombres en lettres.
*** Pour insérer une barre oblique en sens inverse, vous appuyez simultanément sur les touches Altgr + la touche du 8.

Cette méthode est plus contraignante et c'est pourquoi, je ne l'ai pas développée dans la vidéo.


Un autre tutoriel qui pourrait vous intéresser :

✅ Ce qui est bien utile dans un formulaire ou tout autre document à compléter pour afficher différentes informations, selon l'option de sélectionnée





Posts les plus consultés de ce blog

Suivi des stocks et inventaire avec alerte

Cases à cocher interactives sur Excel

Listes déroulantes multi-sélections