怎样在程序中设置excel页眉、页脚？？？

用centerheader,leftheader,rightheader
  centerfooter,leftfooter,rightfooter本示例设置在每一页的顶端打印日期和页号。Worksheets("Sheet1").PageSetup.CenterHeader = "&D page &P of &N"
本示例设置在每一页的底端打印工作簿名称和页号。Worksheets("Sheet1").PageSetup.CenterFooter = "&F page &P"