If by "pages" you mean (work)sheets, the following macro will
do the trick (assuming no hidden sheets)

Sub ReverseSheets()
Dim s As Object, i As Integer, iNumSheets As Integer
iNumSheets = ActiveWorkbook.Sheets.Count
For i = 1 To iNumSheets
Set s = ActiveWorkbook.Sheets(1)
s.Move after:=ActiveWorkbook.Sheets(iNumSheets - i + 1)
Next
End Sub



vlm wrote:
I need to reverse the order of dozens of pages in an Excel workbook. I would
appreciate any advice. Thanks!