Comment imprimer des pages avec des numéros de page en chiffres romains ?
Nous pouvons facilement insérer des numéros de page en chiffres romains dans Word, mais Excel ne prend pas en charge cette fonctionnalité pour les utilisateurs. Parfois, nous devons imprimer les pages d'une feuille de calcul avec des numéros de page en chiffres romains. Comment pourriez-vous résoudre ce problème dans Excel ?
Imprimer des pages avec des numéros de page en chiffres romains à l'aide d'un code VBA
Imprimer des pages avec des numéros de page en chiffres romains à l'aide d'un code VBA
Il n'y a aucune fonctionnalité intégrée qui vous permet d'imprimer des pages avec des numéros de page en chiffres romains, mais vous pouvez créer une macro pour réaliser cette tâche. Suivez les étapes ci-dessous :
1. Ouvrez la feuille de calcul que vous souhaitez imprimer.
2. Maintenez les touches ALT + F11 enfoncées, et la fenêtre Microsoft Visual Basic for Applications s'ouvrira.
3. Cliquez sur Insérer > Module, puis collez le code suivant dans la fenêtre du module.
Code VBA : Imprimer des pages avec des numéros de page en chiffres romains
Sub PrintRoman()
'Update 20140924
Dim xCount As Integer
Dim xIndex As Integer
xCount = ExecuteExcel4Macro("GET.DOCUMENT(50)")
For xIndex = 1 To xCount
Application.ActiveSheet.PageSetup.CenterFooter = Application.Roman(xIndex)
Application.ActiveSheet.PrintOut from:=xIndex, To:=xIndex
Next
Application.ActiveSheet.PageSetup.CenterFooter = ""
End Sub
4. Appuyez ensuite sur la touche F5 pour exécuter le code, et toutes les pages de la feuille de calcul active seront imprimées avec des numéros de page en chiffres romains.
Articles connexes :
Comment imprimer rapidement la première page de chaque feuille ?
Comment imprimer rapidement la page actuelle dans Excel ?
Comment imprimer rapidement les commentaires dans Excel ?
Comment imprimer des données au centre de la page ?
Meilleurs outils de productivité pour Office
Boostez vos compétences Excel avec Kutools pour Excel, et découvrez une efficacité sans précédent. Kutools pour Excel propose plus de300 fonctionnalités avancées pour augmenter la productivité et gagner du temps. Cliquez ici pour obtenir la fonctionnalité dont vous avez le plus besoin...
Office Tab apporte une interface à onglets à Office, et facilite grandement votre travail
- Activez la modification et la lecture par onglets dans Word, Excel, PowerPoint, Publisher, Access, Visio et Project.
- Ouvrez et créez plusieurs documents dans de nouveaux onglets de la même fenêtre, plutôt que dans de nouvelles fenêtres.
- Augmente votre productivité de50 %, et réduit des centaines de clics de souris pour vous chaque jour !