Astuce: Les autres langues sont Google-Traduction. Vous pouvez visiter le English version de ce lien.
Se connecter
x
or
x
x
S'enregistrer
x

or

Comment convertir un nombre en mots dans un document Word?

Cet article traite de la méthode de conversion des nombres en mots anglais dans un document Word. Veuillez consulter les détails si cela vous intéresse.

Convertir un nombre en mots anglais avec VBA

Diviser facilement un document Word en plusieurs

Généralement, nous utilisons copier et coller pour diviser un document Word un par un, mais l'utilitaire Split Documnet peut diviser un document Word basé sur la page, heading1, saut de page ou saut de section, ce qui améliorera l'efficacité du travail. Cliquez pour l'essai gratuit de 45 days!
annonce diviser des documents par page
Kutools for Word: avec des centaines de compléments Word à portée de main, gratuit à essayer sans limitation dans les jours 45.

Convertir un nombre en mots anglais avec VBA

1. Sélectionnez le nombre que vous souhaitez convertir en mots, appuyez sur Alt + F11 clés pour ouvrir Microsoft Visual Basic pour applications fenêtre.

2. Cliquez insérer > Module, et copiez les codes ci-dessous et collez-les au Module scripts.

VBA: Convertir un nombre en mots

Sub ConvertNumberToWord () 'UpdatebyExtendoffice20181010 Dim xDigit As Double Dim xBuff As String Sur Erreur Reprendre Next Selection.MoveLeft wdWord, 1, wdMove Selection.MoveRight wdWord, 1, wdExtend xDigit = Val (Trim). Str (xDigit) <> Trim (Selection.Text) Puis quitter Sub Si xDigit> 0 Puis si xDigit <= 999999 Alors xBuff = Trim (Int (Str (xDigit / 999999999))) Selection.Fields.Add Selection.Range, wdFieldEmpty , "=" + xBuff + "\ * CardText", True Selection.MoveLeft wdWord, 1000000, wdExtend xBuff = Selection.Text & "million" xDigit = Right (Str (xDigit), 1) Finir Si Fin Si Si xDigit <= 6 Ensuite Selection.Fields.Add Selection.Range, wdFieldEmpty, "=" + Str (xDigit) + "\ * CardText", True Selection.MoveLeft wdWord, 999999, wdExtend xDigit = xBuff & Selection.Text Selection.TextTextTextText + " "Else MsgBox" Nombre trop grand ", vbOKOnly," Kutool for Word "End If End Sub

3. presse F5 clé pour exécuter le code, maintenant le nombre a été converti en mots.
numéro de doc au mot 1

Note: Le code ne fonctionne qu'à un numéro à chaque fois.


Navigation par onglets et édition de plusieurs documents Word / classeurs Excel sous Firefox, Chrome, Internet Explorez 10!

Vous pouvez être familier pour voir plusieurs pages Web dans Firefox / Chrome / IE, et basculer entre eux en cliquant sur les onglets correspondants facilement. Ici, l'onglet Office prend en charge le traitement similaire, qui vous permet de parcourir plusieurs documents Word ou classeurs Excel dans une fenêtre Word ou une fenêtre Excel, et de basculer facilement entre eux en cliquant sur leurs onglets.
Cliquez pour l'essai gratuit de l'onglet Office!

Parcourir plusieurs documents Word dans une fenêtre en tant que Firefox


Kutools for Word

Plus que des fonctions avancées 100 pour Word 2003, 2007, 2010, 2013, 2016 et 2019

coup-kutools-700-225-kte

Plus de fonctionnalités | Essai Gratuit | Seulement $ 39.00 pour des centaines de fonctions

Say something here...
symbols left.
You are guest ( Sign Up? )
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.

Be the first to comment.