Excel incluye una función de hoja de trabajo (ROMANO) que le permite convertir números arábigos en números romanos. Quizás se pregunte si existe una función de este tipo que le permita imprimir números romanos como números de página en una copia impresa.

No hay una función incorporada que le permita hacer eso, pero puede crear una macro que hará el truco. Considere la siguiente macro:

Sub RomanPageNums()

Dim iPages As Integer     Dim J As Integer

' Get count of pages in active sheet     iPages = ExecuteExcel4Macro("Get.Document(50)")



' Print worksheet, page by page     With ActiveSheet         For J = 1 To iPages             ' Set page letter             .PageSetup.CenterFooter = Application.Roman(J)

' Print page J             .PrintOut From:=J, To:=J         Next J     End With End Sub

Esta macro primero calcula cuántas páginas hay en su impresión y asigna el valor a la variable iPages. Luego recorre cada página, cambiando el número de página en la parte central del pie de página antes de imprimir cada página. El número de página se establece convirtiendo el número de página actual (J) a un número romano usando la función de hoja de trabajo ROMANO.

Si desea que los números romanos aparezcan en otras partes del pie de página, puede reemplazar la propiedad .CenterFooter con .LeftFooter o .RightFooter. También puede utilizar .LeftHeader, .CenterHeader o .RightHeader, si lo desea.

_Nota: _

Si desea saber cómo usar las macros descritas en esta página (o en cualquier otra página de los sitios ExcelTips), he preparado una página especial que incluye información útil.

link: / excelribbon-ExcelTipsMacros [Haga clic aquí para abrir esa página especial en una nueva pestaña del navegador].

ExcelTips es su fuente de formación rentable en Microsoft Excel.

Este consejo (9362) se aplica a Microsoft Excel 2007, 2010, 2013, 2016, 2019 y Excel en Office 365. Puede encontrar una versión de este consejo para la interfaz de menú anterior de Excel aquí:

link: / excel-Roman_Numerals_for_Page_Numbers [Números romanos para números de página].