在Excel中的某些页面上跳过页脚

Question

我可以在某些页面上跳过页脚（例如最后一页）吗？

sub BeforePrint()
    currentpage=.CurrentPage
    lastpage=.pages.count
    if Lastpage=currentpage then
        .Leftfooter=Hidden
    end if
end sub

vba中有类似上面的代码吗？

Answer 1

没有。每个工作表可以具有不同的首页页脚和/或不同的奇页页脚，但不会有不同的页面页脚。

http://blog.contextures.com/wp-content/uploads/2010/03/headeroptions.png

您可以将页面移动到单独的工作表或单独打印所有其他页面，清除页脚，打印最后一页，然后还原页脚。