1、打开Excel文档，按Alt+F11，打开VBE编辑器，工程区域右键“插入”-“模块”，插入一个新“模块1”。
2、模块代码区域输入如下代码：Sub 页脚更新()Dim T As String T = ActiveSheet.Range("A1").Value 媪青怍牙'此处取当前页面A1的值，可根据需要更改With ActiveSheet.PageSetup .CenterFooter = "&""楷体,加粗""&10" & T & "居中" '将A1的值设置为楷体、加粗、10号、居中页脚显示 .LeftFooter = "&""黑体,加粗""&14" & T & "靠左" '将A1的值设置为黑体、加粗、14号、靠左页脚显示 .RightFooter = "&""幼圆,加粗""&12" & T & "靠右" '将A1的值设置为幼圆、加粗、14号、靠右页脚显示End WithEnd Sub
3、返回Excel文档界面，“开发工具”选项卡下，单击“插入”-“按钮（窗体控件）”，鼠标左键拖拉出一个按钮控件。
4、在按钮控件上右键，单击“指定宏(N)...”。
5、选择“页脚更新”宏，单击“确定”完成宏的指定。
6、单击按钮控件。单击“视图”选项卡下的“页面布局”，可以看到页脚已经实际更新。
