Insert a footer
This tutorial shows how to insert a footer in a specific sheet using Excel and VBA
Insert tab > Text group > Header & Footer > Select footer area > Enter footer > Click anywhere on the sheet
1. Select the Insert tab. |
2. Select the Text group. 3. Click on Header & Footer. |
4. Scroll to the bottom of the page and select the footer area. Note: By default the header will be selected, therefore you will need to scroll to the bottom of the page and select the footer area. In this example we have selected the center footer area. |
5. Enter a footer. 6. Click anywhere on the sheet. Note: In this example we have entered a footer of "Exceldome" in the center footer area. |
Sub Insert_footer()
'declare a variable
Dim ws As Worksheet
Set ws = Worksheets("Sheet1")
With ws.PageSetup
.LeftFooter= ""
.CenterFooter= "Exceldome"
.RightFooter= ""
.CenterFooter= "Exceldome"
.RightFooter= ""
End With
End Sub
NOTES
Note 1: This VBA code will insert a footer of "Exceldome" in the center footer area of only one worksheet, named "Sheet1".
Note 1: This VBA code will insert a footer of "Exceldome" in the center footer area of only one worksheet, named "Sheet1".
RELATED TOPICS
Related Topic | Description | Related Topic and Description |
---|---|---|
Show gridlines in a worksheet | How to show gridlines in a worksheet | |
Insert a header | How to insert a header in a specific sheet |