Question

如何把excel文件设置成奇数页码？具体讲就是第1、2、3、4……页显示出来的页码分别为1、3、5、7……

这个问题，我在网上找了大半天，没有找到答案，希望有好心人帮忙解答。不胜感激！

Answer 1

如果是想打印出来显示的，可以用VBA设置任意页码，请参考下面代码：
Sub 设置奇数页脚()
t = ExecuteExcel4Macro("GET.DOCUMENT(50)")
For i = 1 To t
ActiveSheet.PageSetup.CenterFooter = "第" & i * 2 - 1 & "页"
ActiveSheet.PrintOut From:=i, to:=i
Next
End Sub