letters instead of numbers for pages

  • Thread starter Thread starter Cotton
  • Start date Start date
Give this a shot - in a std module

Sub UseLetters()
ActiveSheet.DisplayPageBreaks = True
Pgcount = ActiveSheet.HPageBreaks.Count + 1
CvNum = 64
For c = 1 To Pgcount
With ActiveSheet.PageSetup
.LeftFooter = "This is Page " & Chr(CvNum + c) & " of " & Chr(CvNum +
Pgcount)
End With
ActiveSheet.PrintPreview 'Or ActiveSheet.PrintOut
Next c
End Sub
 
You must log in or register to reply here.

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Similar Threads

in excel, workbook column heading is displaying numbers not lette. 2
Showing Letters For Column Headers Rather Thann Numbers ? 1
Creating sequential numbers plus a letter 4
How do I change headings (column name) from numbers to letters? 2
Columns are numbers instead of letters 4
Column labels showing as 1 2 3 4 5 instead of A B C D E - how to f 3
Formulas to display all 3 letter combinations in 8 letters 1
Column Heading 1

Back
Top