? Formatage du texte en tant que monnaie est une entreprise délicate dans Microsoft Word 2007. Contrairement à Excel , Word ne dispose pas de numéro de mise en forme (sauf dans les formules ) . Il ya , cependant, quelques approches possibles pour la mise en forme texte numérique en tant que valeurs en dollars américains. Brute Force simplement assez , tapez le montant complet , complet avec le signe du dollar , les virgules et deux chiffres après la virgule . Si vous avez seulement besoin de créer parfois de petites tables avec quelques valeurs , c'est l'option la plus simple et la plus rapide, facile . Création d'une macro Voici où il obtient délicat. L'écriture de macros nécessite un petit effort, mais une fois la macro créée, vous serez en mesure de mettre en forme rapidement de grandes sections d'une table avec le clic d' un bouton ou un raccourci clavier. Activer l'onglet Développeur , cliquez sur le bouton Office et en cliquant sur le bouton " Word options " en bas du menu. Dans la section Populaire , cliquez sur la case à cocher " Afficher l'onglet Développeur dans le ruban " donc il ya une coche dans la case . Cliquez sur « OK ». Sur l'onglet Développeur ( entre Voir et compléments ) , cliquez sur le bouton Macros dans le groupe Code pour ouvrir la fenêtre Macros. Tapez " Format_Currency " pour le nom de la macro . Sélectionnez " Normal.dotm ( modèle global) " des " Macros dans " Menu ( cela rendra votre macro disponible dans tout document que vous créez ou modifiez ) . Cliquez sur " Créer". L'éditeur Visual Basic s'ouvre. Remplacer le texte dans l'éditeur avec le code suivant ( se terminant par "End Sub " ) : . Sous Format_Currency () '' numéros de définition dans des cellules de tableau sélectionnées en tant que monnaie américaine 'Dim TCell Comme Word.CellDim Trangé comme RangeIf Selection.Type = wdSelectionIP Or Not Selection.Information ( wdWithInTable ) ThenMsgBox « sélectionner des valeurs numériques dans les cellules des tables avant d'exécuter cette macro. ", " erreur " Exit SubEnd IFFOR Chaque TCell en Selection.CellsSet Trangé = TCell . RangetRange.End = tRange.End - 1Avec tRangeIf IsNumeric ( Trangé ) Then.Text = FormatCurrency (Expression : = texte . ) Fin IFON Error GoTo SkipSkip : Fin WithNext tCellEnd Sous Sauvegardez et fermez l'éditeur Visual Basic. Dans Word , sélectionnez le menu déroulant à côté de la barre d'outils Accès rapide et sélectionnez « Autres commandes. " Select " Macros " des " Choisir les commandes " du menu, sélectionnez la macro Format_Currency et cliquez sur " Ajouter ". ; cliquez sur " . OK" pour utiliser la macro , sélectionnez les valeurs que vous souhaitez formater dans votre table, et cliquez sur le bouton Format_Currency sur la barre d'outils Accès rapide Insérer un fichier Excel . tableur Si vous avez Excel, l'insertion d'une feuille de calcul Excel peut être plus facile , et vous donner la pleine puissance de formules Excel , le formatage et d'autres fonctions. Dans l'onglet insertion, ouvert le menu Tableau dans le groupe Tableaux . Sélectionnez " feuille de calcul Excel. " Un petit tableur sera inséré dans votre document, et le ruban Excel apparaît à la place du ruban de Word. Tapez vos valeurs dans les cellules du tableur . Sélectionnez les cellules que vous souhaitez mettre en forme comme monnaie. Sur l'onglet Accueil , sélectionnez «Devise» dans le menu Format de nombre dans le groupe Numbers. Cliquez en dehors de la feuille de calcul pour fermer le ruban Excel et poursuivre l'édition du document. La feuille de calcul apparaît comme une table sans étiquettes de ligne et de colonne ou des barres de défilement . Cliquez sur la feuille de calcul et tirez les poignées de redimensionnement pour redimensionner le tableur. Double-cliquez sur la feuille de calcul pour le modifier.
|