Si vous avez une colonne de valeurs numériques dans votre feuille de calcul et que vous devez les convertir en mots équivalents en anglais, vous vous demandez peut-être comment procéder. Excel ne dispose pas d'une formule permettant de le faire directement, mais il existe quelques solutions de contournement que vous pouvez utiliser, notamment WPS AI qui convertit les nombres en mots avec un simple prompt. Dans cet article, nous allons vous montrer comment convertir des nombres en mots dans Excel.
Partie 1 : Comment convertir des nombres en mots dans Excel à l'aide de VBA

Votre feuille Excel est remplie de nombres, et imaginez maintenant que ces nombres se transforment par magie en mots. C'est tout le pouvoir de la macro SpellNumber dans l'univers d'Excel. Découvrons simplement comment ajouter cette macro, afin de préparer le terrain pour la magie à venir.
Exemple : Transformer des nombres en mots
Vous avez une colonne de nombres dans la colonne A, allant de 1 à 10. Vous souhaitez convertir ces nombres en mots pour apporter une touche d'élégance à vos données. Voyons comment ajouter la macro SpellNumber pour y parvenir en préparation de la prochaine étape.
Étape 1. Ouvrez Excel et accédez à l'onglet « Développeur ». Si vous ne voyez pas cet onglet, ne vous inquiétez pas ! Il peut être facilement activé dans les options d'Excel.


Étape 2. Cliquez sur « Visual Basic » pour ouvrir l'éditeur VBA.

Étape 3. Dans l'éditeur VBA, allez dans « Insertion » et sélectionnez « Module ». C'est là que la magie va opérer.

Étape 4. Copiez et collez le code de la macro SpellNumber depuis nos liens de référence ci-dessous dans le module.
Function SpellNumber(ByVal MyNumber) 'Update by Extendoffice Dim xStr As String Dim xFNum As Integer Dim xStrPoint Dim xStrNumber Dim xPoint As String Dim xNumber As String Dim xP() As Variant Dim xDP Dim xCnt As Integer Dim xResult, xT As String Dim xLen As Integer On Error Resume Next xP = Array("", "Thousand ", "Million ", "Billion ", "Trillion ", " ", " ", " ", " ") xNumber = Trim(str(MyNumber)) xDP = InStr(xNumber, ".") xPoint = "" xStrNumber = "" If xDP > 0 Then xPoint = " point " xStr = Mid(xNumber, xDP + 1) xStrPoint = Left(xStr, Len(xNumber) - xDP) For xFNum = 1 To Len(xStrPoint) xStr = Mid(xStrPoint, xFNum, 1) xPoint = xPoint & GetDigits(xStr) & " " Next xFNum xNumber = Trim(Left(xNumber, xDP - 1)) End If xCnt = 0 xResult = "" xT = "" xLen = 0 xLen = Int(Len(str(xNumber)) / 3) If (Len(str(xNumber)) Mod 3) = 0 Then xLen = xLen - 1 Do While xNumber <> "" If xLen = xCnt Then xT = GetHundredsDigits(Right(xNumber, 3), False) Else If xCnt = 0 Then xT = GetHundredsDigits(Right(xNumber, 3), True) Else xT = GetHundredsDigits(Right(xNumber, 3), False) End If End If If xT <> "" Then xResult = xT & xP(xCnt) & xResult End If If Len(xNumber) > 3 Then xNumber = Left(xNumber, Len(xNumber) - 3) Else xNumber = "" End If xCnt = xCnt + 1 Loop xResult = xResult & xPoint SpellNumber = xResult End Function Function GetHundredsDigits(xHDgt, xB As Boolean) Dim xRStr As String Dim xStrNum As String Dim xStr As String Dim xI As Integer Dim xBB As Boolean xStrNum = xHDgt xRStr = "" On Error Resume Next xBB = True If Val(xStrNum) = 0 Then Exit Function xStrNum = Right("000" & xStrNum, 3) xStr = Mid(xStrNum, 1, 1) If xStr <> "0" Then xRStr = GetDigits(Mid(xStrNum, 1, 1)) & "Hundred " Else If xB Then xRStr = "and " xBB = False Else xRStr = " " xBB = False End If End If If Mid(xStrNum, 2, 2) <> "00" Then xRStr = xRStr & GetTenDigits(Mid(xStrNum, 2, 2), xBB) End If GetHundredsDigits = xRStr End Function Function GetTenDigits(xTDgt, xB As Boolean) Dim xStr As String Dim xI As Integer Dim xArr_1() As Variant Dim xArr_2() As Variant Dim xT As Boolean xArr_1 = Array("Ten ", "Eleven ", "Twelve ", "Thirteen ", "Fourteen ", "Fifteen ", "Sixteen ", "Seventeen ", "Eighteen ", "Nineteen ") xArr_2 = Array("", "", "Twenty ", "Thirty ", "Forty ", "Fifty ", "Sixty ", "Seventy ", "Eighty ", "Ninety ") xStr = "" xT = True On Error Resume Next If Val(Left(xTDgt, 1)) = 1 Then xI = Val(Right(xTDgt, 1)) If xB Then xStr = "and " xStr = xStr & xArr_1(xI) Else xI = Val(Left(xTDgt, 1)) If Val(Left(xTDgt, 1)) > 1 Then If xB Then xStr = "and " xStr = xStr & xArr_2(Val(Left(xTDgt, 1))) xT = False End If If xStr = "" Then If xB Then xStr = "and " End If End If If Right(xTDgt, 1) <> "0" Then xStr = xStr & GetDigits(Right(xTDgt, 1)) End If End If GetTenDigits = xStr End Function Function GetDigits(xDgt) Dim xStr As String Dim xArr_1() As Variant xArr_1 = Array("Zero ", "One ", "Two ", "Three ", "Four ", "Five ", "Six ", "Seven ", "Eight ", "Nine ") xStr = "" On Error Resume Next xStr = xArr_1(Val(xDgt)) GetDigits = xStr End Function |
|---|
Étape 5. Fermez l'éditeur VBA et retournez à votre feuille de calcul Excel.

Mon expérience avec l'ajout de la macro SpellNumber :
L'intégration de la macro SpellNumber dans Excel a été étonnamment facile. J'ai suivi les étapes jusqu'à l'onglet Développeur et l'éditeur VBA, où j'ai ajouté le code de la macro pour la formulation des montants utilisée en comptabilité. La façon dont les nombres pouvaient se transformer en texte m'a intrigué. Néanmoins, j'ai appris à faire preuve de prudence ; les macros exigent de la précision pour éviter de perturber la feuille de calcul. Le fait d'avoir une sauvegarde et de comprendre la structure de VBA m'a aidé. Cette expérience m'ouvre la voie à d'autres possibilités avec Excel, mêlant logique et créativité.
Vos feuilles de calcul Excel deviennent une toile pour la magie linguistique. Dans la deuxième partie, nous vous donnons la clé pour débloquer la macro SpellNumber, un outil puissant qui transforme vos données numériques en une éloquente symphonie de mots. Parcourez des exemples pratiques qui éclairent le chemin vers la maîtrise, et regardez vos données se transformer sous vos yeux, guidées par l'art de cette macro remarquable.
Exemple : Transformer des données numériques en mots
Étape 1. Ouvrez votre feuille de calcul Excel contenant les données numériques que vous souhaitez transformer.
Étape 2. Sélectionnez une colonne adjacente. Utilisons la colonne B pour les mots transformés.
Étape 3. Dans la première cellule de la colonne B, saisissez =SpellNumber(A1).

Étape 4. Appuyez sur Entrée et regardez le nombre de la cellule A1 se transformer élégamment en mots dans la cellule B1.
Étape 5. Pour transformer d'autres nombres, faites glisser la formule vers le bas et laissez la macro SpellNumber opérer sa magie.

Mon expérience d'utilisation de la macro SpellNumber :
L'essai de la macro SpellNumber a apporté une nouvelle perspective lorsque les nombres se sont transformés en mots, donnant une touche originale à mes données. Le processus était simple, révélant son potentiel pour améliorer la communication. Toutefois, un mot d'avertissement s'impose : la précision est importante. Un petit faux pas pourrait entraîner des résultats inattendus. Une bonne connaissance de la macro et une validation minutieuse des saisies sont essentielles pour une expérience sans accroc.
Partie 2 : Comment convertir des nombres en mots dans Excel sans VBA
Naviguer dans le paysage complexe de VBA peut sembler intimidant, mais ne craignez rien, car il existe une voie plus simple pour réaliser l'exploit magique de convertir des nombres en mots. Cette approche alternative, qui utilise une fonction définie par l'utilisateur, offre une méthode simplifiée qui conserve la même transformation attrayante. En explorant les étapes suivantes, nous découvrons cette technique innovante qui vous permet d'insuffler à vos données le charme lyrique des mots, tout en évitant les complexités de VBA.
Avantages de l'utilisation de la macro SpellNumber :
1. Facilité d'utilisation : La fonction définie par l'utilisateur se distingue par sa simplicité. Aucune connaissance en VBA n'est requise, ce qui la rend accessible à un public plus large.
2. Accessibilité universelle : Contrairement aux macros qui doivent être intégrées dans chaque classeur, la fonction accompagne la feuille de calcul, garantissant ainsi un partage sans difficulté.
3. Zéro alerte de macro : Dites adieu aux alertes de macro gênantes lors du partage de vos classeurs. La fonction opère en arrière-plan et transforme élégamment les nombres en mots.
Inconvénients de l'utilisation d'une macro pour SpellNumber dans Excel :
1. Maîtrise de VBA : Les macros nécessitent des compétences en VBA pour être personnalisées, ce qui peut limiter les personnes peu familières avec la programmation.
2. Spécifique au classeur : Les macros doivent être copiées ou intégrées dans chaque classeur, ce qui ajoute de la complexité et des efforts de maintenance.
3. Alertes de macro : Le partage d'un classeur contenant des macros peut déclencher des alertes, ce qui risque de soulever des problèmes de sécurité.
Maintenant, prenons le chemin de traverse et observons l'art de cette méthode (l'utilisation de combinaisons de formules disponibles dans Excel) à travers un exemple pratique.
Comment convertir des nombres en mots dans Excel sans VBA
Exemple : Transformer des nombres en mots à l'aide d'une formule
Étape 1. Ouvrez votre feuille de calcul Excel contenant les données numériques que vous souhaitez transformer.

Étape 2. Sélectionnez une colonne adjacente aux nombres. Utilisons la colonne B pour les mots transformés.
Étape 3. Dans la première cellule de la colonne B, saisissez la formule :
=IF(OR(LEN(FLOOR(A1,1))=13,FLOOR(A1,1)<=0),"out of="" range="">1,CHOOSE(MID(TEXT(INT(A1),REPT(0,12)),3,1)+1,""," one"," two"," three"," four"," five"," six"," seven"," eight"," nine"),IF(VALUE(MID(TEXT(INT(A1),REPT(0,12)),2,1))=0,CHOOSE(MID(TEXT(INT(A1),REPT(0,12)),3,1)+1,"","one","two","three","four","five","six","seven","eight","nine"),"")),IF(A1>=10^9," billion ",""),CHOOSE(MID(TEXT(INT(A1),REPT(0,12)),4,1)+1,"","one hundred ","two hundred ","three hundred ","four hundred ","five hundred ","six hundred ","seven hundred ","eight hundred ","nine hundred "),CHOOSE(MID(TEXT(INT(A1),REPT(0,12)),5,1)+1,"",CHOOSE(MID(TEXT(INT(A1),REPT(0,12)),6,1)+1,"ten","eleven","twelve","thirteen","fourteen","fifteen","sixteen","seventeen","eighteen","nineteen"),"twenty","thirty","forty","fifty","sixty","seventy","eighty","ninety"),IF(VALUE(MID(TEXT(INT(A1),REPT(0,12)),5,1))>1,CHOOSE(MID(TEXT(INT(A1),REPT(0,12)),6,1)+1,""," one"," two"," three"," four"," five"," six"," seven"," eight"," nine"),IF(VALUE(MID(TEXT(INT(A1),REPT(0,12)),5,1))=0,CHOOSE(MID(TEXT(INT(A1),REPT(0,12)),6,1)+1,"","one","two","three","four","five","six","seven","eight","nine"),"")),IF(VALUE(MID(TEXT(INT(A1),REPT(0,12)),4,3))>0," million ",""),CHOOSE(MID(TEXT(INT(A1),REPT(0,12)),7,1)+1,"","one hundred ","two hundred ","three hundred ","four hundred ","five hundred ","six hundred ","seven hundred ","eight hundred ","nine hundred "),CHOOSE(MID(TEXT(INT(A1),REPT(0,12)),8,1)+1,"",CHOOSE(MID(TEXT(INT(A1),REPT(0,12)),9,1)+1,"ten","eleven","twelve","thirteen","fourteen","fifteen","sixteen","seventeen","eighteen","nineteen"),"twenty","thirty","forty","fifty","sixty","seventy","eighty","ninety"),IF(VALUE(MID(TEXT(INT(A1),REPT(0,12)),8,1))>1,CHOOSE(MID(TEXT(INT(A1),REPT(0,12)),9,1)+1,""," one"," two"," three"," four"," five"," six"," seven"," eight"," nine"),IF(VALUE(MID(TEXT(INT(A1),REPT(0,12)),8,1))=0,CHOOSE(MID(TEXT(INT(A1),REPT(0,12)),9,1)+1,"","one","two","three","four","five","six","seven","eight","nine"),"")),IF(VALUE(MID(TEXT(INT(A1),REPT(0,12)),7,3))," thousand ",""),CHOOSE(MID(TEXT(INT(A1),REPT(0,12)),10,1)+1,"","one hundred ","two hundred ","three hundred ","four hundred ","five hundred ","six hundred ","seven hundred ","eight hundred ","nine hundred "),CHOOSE(MID(TEXT(INT(A1),REPT(0,12)),11,1)+1,"",CHOOSE(MID(TEXT(INT(A1),REPT(0,12)),12,1)+1,"ten","eleven","twelve","thirteen","fourteen","fifteen","sixteen","seventeen","eighteen","nineteen"),"twenty","thirty","forty","fifty","sixty","seventy","eighty","ninety"),IF(VALUE(MID(TEXT(INT(A1),REPT(0,12)),11,1))>1,CHOOSE(MID(TEXT(INT(A1),REPT(0,12)),12,1)+1,""," one"," two"," three"," four"," five"," six"," seven"," eight"," nine"),IF(VALUE(MID(TEXT(INT(A1),REPT(0,12)),11,1))=0,CHOOSE(MID(TEXT(INT(A1),REPT(0,12)),12,1)+1,"","one","two","three","four","five","six","seven","eight","nine"),"")))," "," ")&IF(FLOOR(A1,1)>1," "," "))&IF(ISERROR(FIND(".",A1,1)),""," point "&PROPER(IF(LEN(LEFT(TRIM(MID(SUBSTITUTE('Number to Word Without VBA'!A1,".",REPT(" ",255)),255,200)),2))=1,CHOOSE(1*LEFT(TRIM(MID(SUBSTITUTE('Number to Word Without VBA'!A1,".",REPT(" ",255)),255,200)),2),"One","Two","Three","Four","Five","Six","Seven","Eight","Nine")&" ","")&CONCATENATE(CHOOSE(MID(TEXT(INT(LEFT(TRIM(MID(SUBSTITUTE('Number to Word Without VBA'!A1,".",REPT(" ",255)),255,200)),2)),REPT(0,12)),11,1)+1,"",CHOOSE(MID(TEXT(INT(LEFT(TRIM(MID(SUBSTITUTE('Number to Word Without VBA'!A1,".",REPT(" ",255)),255,200)),2)),REPT(0,12)),12,1)+1,"One","One One","One Two","One Three","One Four","One Five","One Six","One Seven","One Eight","One Nine")&" ","Two","Three","Four","Five","Six","Seven","Eight","Nine"),IF(VALUE(MID(TEXT(INT(LEFT(TRIM(MID(SUBSTITUTE('Number to Word Without VBA'!A1,".",REPT(" ",255)),255,200)),2)),REPT(0,12)),11,1))>1,CHOOSE(MID(TEXT(INT(LEFT(TRIM(MID(SUBSTITUTE('Number to Word Without VBA'!A1,".",REPT(" ",255)),255,200)),2)),REPT(0,12)),12,1)+1,""," One"," Two"," Three"," Four"," Five"," Six"," Seven"," Eight"," Nine")&" ",IF(LEFT(TRIM(MID(SUBSTITUTE('Number to Word Without VBA'!A1,".",REPT(" ",255)),255,200)),2)="01","one ",IF(LEFT(TRIM(MID(SUBSTITUTE('Number to Word Without VBA'!A1,".",REPT(" ",255)),255,200)),1)="0",CHOOSE(MID(TEXT(INT(LEFT(TRIM(MID(SUBSTITUTE('Number to Word Without VBA'!A1,".",REPT(" ",255)),255,200)),2)),REPT(0,12)),12,1)+1,"","One","Two","Three","Four","Five","Six","Seven","Eight","Nine")&" ",""))))))) |
|---|
Étape 4. Appuyez sur Entrée, et observez le nombre de la cellule A2 se transformer gracieusement en mots dans la cellule B2.

Étape 5. Pour transformer des nombres supplémentaires, faites glisser la formule vers le bas et découvrez cette métamorphose magique.

Mon expérience d'utilisation de la fonction définie par l'utilisateur :
En explorant les fonctions définies par l'utilisateur, j'ai apprécié la simplicité qu'elles apportent : pas de code VBA complexe ni de configurations compliquées. Juste une formule simple pour transformer des nombres en mots, ajoutant une touche unique à Excel. Attention tout de même : il est essentiel de bien comprendre la fonction. Testez-la dans différents scénarios pour en vérifier l'exactitude. Cet aperçu pratique souligne la valeur de la fonction tout en mettant en évidence l'importance d'une utilisation prudente pour obtenir les meilleurs résultats.
Partie 3 : Pourquoi utiliser WPS Office ?

Il est important de noter que les méthodes que nous avons explorées jusqu'à présent sont applicables non seulement à Microsoft Excel, mais aussi à WPS Office Spreadsheet. Cependant, nous vous invitons à découvrir les avantages distincts que WPS Office apporte. Voici pourquoi nous vous recommandons d'envisager WPS Office pour vos travaux de transformation dans Excel :
1. Prix : WPS Office offre une alternative abordable sans faire de compromis sur les fonctionnalités, ce qui en fait un choix rentable pour un usage personnel et professionnel.
2. Compatibilité : Échangez des documents sans effort entre WPS Office et Microsoft Office, ce qui garantit une collaboration et un partage de documents fluides.
3. Fonctionnalités : WPS Office propose une suite complète de fonctionnalités rivalisant avec les standards de l'industrie, vous permettant d'accomplir diverses tâches en toute simplicité. Il dispose également de fonctionnalités d'IA telles que AI Writer et un traducteur de documents par IA.
4. Interface conviviale : Naviguer dans WPS Office est un jeu d'enfant, même pour les novices. Son interface intuitive assure un apprentissage facile et un flux de travail efficace.
5. Découvrez des joyaux cachés : Plongez dans le blog WPS pour dénicher des astuces précieuses qui renforceront vos compétences. Des techniques avancées aux solutions innovantes, chaque tutoriel est un pas de plus vers l'expertise.
6. Conversion de format rapide : Pour améliorer votre efficacité au travail, WPS Office permet également de rapidement convertir un fichier Excel en PDF.
7. Boost de productivité grâce à l'IA : WPS AI décuple vos tâches quotidiennes, allant de la conversion de nombres en mots dans Excel à l'aide d'un simple prompt à la génération automatique de formules, en passant par le résumé de documents et la traduction de textes en temps réel.
Partie 4 : Comment convertir des nombres en mots dans Excel avec WPS AI
Dans le prolongement des méthodes sans VBA que nous venons d'explorer, WPS AI offre un moyen encore plus intuitif de convertir des nombres en mots, sans aucune création manuelle de formules. Cette approche basée sur l'IA simplifie encore davantage le processus, le rendant accessible aux utilisateurs de tous niveaux de compétence.
Étape 1. Dans une cellule vide, commencez à taper =WPSAI et double-cliquez sur la fonction WPSAI dans le menu déroulant.

Étape 2. À l'intérieur des parenthèses de la fonction, faites référence à la cellule contenant votre nombre cible, puis ajoutez le prompt.

Étape 3. Appuyez sur Entrée, et l'IA générera instantanément l'équivalent en mots du nombre dans cette cellule.

Étape 4. Faites glisser la poignée de recopie vers le bas à partir de la première cellule convertie pour appliquer la même conversion par l'IA à tous les autres nombres de votre colonne.


Les nombres figurant dans les cellules sélectionnées seront convertis en texte.
Contrairement aux formules statiques sans VBA qui sont liées à une règle de conversion spécifique, l'IA peut comprendre des prompts en langage naturel. Ainsi, si j'ai besoin de changer de style, il me suffit de modifier le prompt au lieu de reconstruire une formule. Cela élimine également le besoin de mémoriser une syntaxe complexe ou de dépanner des fonctions imbriquées ; l'IA s'occupe du plus dur, ce qui me permet de me concentrer sur mes données plutôt que sur la technique. Une fois les statistiques terminées, vous pouvez également utiliser la fonction de conversion de WPS Office, notamment d'Excel vers PDF.
FAQ sur la conversion de nombres en mots dans Excel
Puis-je faire l'inverse et convertir des mots en nombres ?
Absolument ! Inverser la conversion, en passant des mots aux nombres, est tout à fait possible dans WPS Office en utilisant le code VBA. Bien que notre discussion ait porté sur la transformation de nombres en mots, il est important de noter que WPS Office fournit des outils polyvalents pour gérer les deux sens de conversion.
Puis-je convertir des nombres en mots en un seul clic ?
Absolument, convertir des nombres en mots en un seul clic est un jeu d'enfant grâce aux capacités remarquables de WPS Office (en utilisant VBA ou des combinaisons de formules disponibles). Ce processus rationalisé simplifie vos tâches, vous permettant de gagner un temps précieux et d'économiser vos efforts.
Qu'est-ce que VBA et comment l'apprendre rapidement ?
VBA est un langage de programmation développé par Microsoft, utilisé pour automatiser des tâches et créer des solutions personnalisées dans les applications Office telles qu'Excel, Word et PowerPoint.
Apprendre rapidement VBA :
Bases : Comprendre les concepts de programmation tels que les variables et les boucles.
Éditeur VBA : L'ouvrir dans les applications Office pour écrire du code.
Exemples : Étudier des exemples simples de code.
Enregistrer des macros : Apprendre en enregistrant des actions.
Ressources en ligne : Utiliser des tutoriels et des cours.
Pratique : Coder régulièrement de petits projets.
Documentation : Explorer la documentation VBA de Microsoft.
Communautés : Participer à des forums en ligne.
Création : Créer vos propres macros pour des tâches concrètes.
Débogage : Apprendre à corriger les erreurs de code.
Curiosité : Continuer à explorer et à expérimenter.
La maîtrise de VBA améliore la productivité et offre des solutions sur mesure.
Que dois-je faire si le fichier est corrompu pendant le processus de conversion ?
Généralement, les problèmes de corruption de fichiers ne se produisent pas. Cependant, s'il y a corruption pendant le processus de conversion, ne vous inquiétez pas non plus : vous pouvez utiliser l'outil de réparation de fichiers WPS (WPS File Repair Tool) pour récupérer un fichier Excel.
Résumé
Dans ce guide, nous avons exploré différentes manières de convertir des nombres en mots dans Excel, en nous concentrant à la fois sur les macros VBA et sur les fonctions définies par l'utilisateur. Nous avons fourni des instructions claires, étape par étape, ainsi que des exemples pour chaque méthode. En soulignant les avantages de WPS Office, nous avons mis en évidence sa compatibilité avec Excel, ses fonctionnalités conviviales et son prix abordable, sans oublier son puissant outil WPS AI qui simplifie la conversion de nombres en mots grâce à un simple prompt. WPS met également à votre disposition un lecteur de fichiers XLSX (xlsx viewer) pour vous aider à ouvrir et consulter instantanément vos fichiers Excel. Que vous optiez pour VBA ou pour des fonctions définies par l'utilisateur, ce guide vous donne les clés pour réussir facilement la conversion de nombres en mots tout en appréciant les avantages de WPS Office pour l'optimisation de vos tâches de bureau.





