Excel include una funzione del foglio di lavoro (ROMANO) che consente di convertire i numeri arabi in numeri romani. Potresti chiederti se esiste una funzione simile che ti consente di stampare numeri romani come numeri di pagina su una stampa.

Non esiste una funzionalità incorporata che ti consenta di farlo, ma puoi creare una macro che farà il trucco. Considera la seguente 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.WorksheetFunction.Roman(J)

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

Questa macro prima calcola quante pagine ci sono nella stampa e assegna il valore alla variabile iPages. Quindi scorre ogni pagina, modificando il numero di pagina nella parte centrale del piè di pagina prima di stampare ogni pagina. Il numero di pagina viene impostato convertendo il numero di pagina corrente (J) in un numero romano utilizzando la funzione del foglio di lavoro ROMANO.

Se desideri che i numeri romani appaiano in altre parti del piè di pagina, puoi sostituire la proprietà .CenterFooter con .LeftFooter o .RightFooter. Puoi anche usare .LeftHeader, .CenterHeader o .RightHeader, se lo desideri.

Il codice nella macro RomanPageNums funziona in tutte le versioni recenti di Excel. Se stai usando Excel 2000 o superiore, potresti anche sostituire la riga effettiva che imposta il piè di pagina con il seguente codice:

.PageSetup.CenterFooter = Application.Roman(J)

_Nota: _

Se desideri sapere come utilizzare le macro descritte in questa pagina (o in qualsiasi altra pagina dei siti ExcelTips), ho preparato una pagina speciale che include informazioni utili.

Fare clic qui per aprire quella pagina speciale in una nuova scheda del browser.

ExcelTips è la tua fonte di formazione economica su Microsoft Excel.

Questo suggerimento (2518) si applica a Microsoft Excel 97, 2000, 2002 e 2003. Puoi trovare una versione di questo suggerimento per l’interfaccia a nastro di Excel (Excel 2007 e versioni successive) qui:

Numeri romani per numeri di pagina.