excel97 capital letters in footer

Topic

New Reply

Using Excel97 SR2, I use the [File] to insert the active workbook’s name into my footer. However, if the name is 11101A, I get 11101a. The letters are the wrong case. What should I do to get uppercase letters in the footer?

Reply | Quote

Replies

Put this code in the BeforePrint event of your workbook:

Worksheets(“sheet1”).PageSetup.CenterFooter = UCase(ThisWorkbook.Name)

Change the sheet1 to your worksheet name.

Reply | Quote