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.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.

_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.

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

Questo suggerimento (9362) si applica a Microsoft Excel 2007, 2010, 2013, 2016, 2019 ed Excel in Office 365. Puoi trovare una versione di questo suggerimento per la vecchia interfaccia del menu di Excel qui: