我给VBA下的界说：VBA是个东谈主袖珍自动化贬责的有用器用。不错大大升迁我方的服务遵循，并且不错升迁数据的准确性。我这里专注VBA,将我多年的教授汇集在VBA系列九套教程中。

看成我的学员要诓骗我的积木编程想想，积木编程最迫切的是积木如何搭建及领有积木。在九套教程中我给出了多数的积木，同期考验了如何搭建。为了让学员领有更多的积木，我启动入辖下手这部《VBA即用型代码手册（汉英）》的创作，这部手册约600页，围聚约500多个的案例，案例我用汉语和英语同期发布，一方面学员从中不错更好的调解和掌抓VBA顶用到的一些英语学问，另一方面，环球不错看到多样种种的积木。这部手册是环球学习和责任中的不行多得的实用辛勤。本日的实质是： VBA即用型代码手册：缔造PDF页眉中心表现实质Set PDF Header Center Display Content

【共享遵循，随喜正能量】礼赞菩萨，积福胜似存钱，财帛齐是射中福报蔓延而来，若想求得钞票，就应该戮力教授福报，多多行善。。

第四章 责任表代码

Worksheet Codes

33 缔造PDF页眉中心表现实质Set PDF Header Center Display Content

Sub mynzSaveExcelAsPdf_PrintCenterHeader()

'缔造PDF页眉中心表现实质

With ActiveSheet.PageSetup

'缔造页眉的中心部分中表现的实质。

.CenterHeader = "Sample Excel File Saved As PDF"

.Orientation = xlPortrait

.PrintArea = "$A$1:$F$105"

.PrintTitleRows = ActiveSheet.Rows(1).Address

.Zoom = False

.FitToPagesTall = False

.FitToPagesWide = 1

End With

ActiveSheet.ExportAsFixedFormat _

Type:=xlTypePDF, _

Filename:="myPDF", _

Quality:=xlQualityStandard, _

IncludeDocProperties:=False, _

IgnorePrintAreas:=False, _

From:=1, To:=5, _

OpenAfterPublish:=True

End Sub

本节实质参考程引言件：Chapter04-6.xlsm

我20多年的VBA试验教授，沿路浓缩鄙人面的各个教程中：