How do I copy cell contents to footer in Excel

  • Thread starter Thread starter Access novice
  • Start date Start date
A

Access novice

I would like to copy the contents of a cell into the footer of an Excel
worksheet.
 
Sub Footersss()
With ActiveSheet.PageSetup
.CenterFooter = ActiveCell.Text
End With
End Sub

HIH
 
Back
Top