【撷取丰硕成果，Q1566A正能量】事事千万别太过强求，出现了就选着拒绝接受，千万别太过全然，即使，在我看来最合适的精心安排！。
《VBA之Word应用领域》，是我面世第七套讲义，讲义是专门针对传授VBA在Word中的应用领域，紧紧围绕“面向对象编程”传授，具体来说让他们重新认识Word中VBA的第一类，和第一类的特性、方式，接着透过示例让他们感受到Word VBA 的诀窍。热购讲义共两卷第十卷，本周一文本第六章: Sections第一类和Section第一类的第2节：借助Section第一类的方式及特性顺利完成页面设置
第一节 Sections第一类的特性和方式
他们好，他们竭尽全力Sections第一类的特性的传授，前序的文本中他们自学了Sections第一类的Count 特性、First 特性、Last 特性，在这节中他们会自学到Sections第一类的PageSetup 特性、Add 方式、Item 方式。
1 Sections.PageSetup 特性
那个特性返回两个PageSetup第一类,该第一类与选定的文件格式、地区、节、节的子集或选取文本密切相关。
句法：expression.PageSetup
当中expression 是须要的。两个代表者”Sections”子集的表达式。
2 Sections.Add 方式
那个特性方式回到两个Section第一类，该第一类代表者加进到文件格式中的新节。
句法：expression.Add（Range Start）
当中expression 是须要的。两个代表者”Sections”子集的表达式。
模块：
1）Range可选Variant要在其之前插入分节符的地区。如果省略该模块，则将分节符插至文件格式末尾。
2）Start可选Variant要加进的分节符的类型。可以是 WdSectionStart 常量之一。如果省略此模块，则加进的下一页分节符。
WdSectionStart 枚举值：
1）wdSectionContinuous 0“连续”分节符。
2）wdSectionEvenPage3“偶数页”分节符.
3）wdSectionNewColumn1“新栏”分节符.
4）wdSectionNewPage2“新页”分节符.
5）wdSectionOddPage4“奇数页”分节符.
3 Sections.Item 方式
那个方式回到子集中的单个 Section 第一类。
句法：expression.Item (Index)
当中expression 是须要的。两个代表者”Sections”子集的表达式。
模块：
1）Index须要Long要回到的单个第一类。可以是Long ,表示单个第一类的序号位置。
4示例：节页面的设置及新节的插入
这节给他们传授两个示例，那个示例中会借助Section 第一类的方式及特性顺利完成页面设置及新节的插入。他们看下面的代码：
Sub mynzA()
将当前活动文件格式的第一节的装订线设置为36磅（0.5英寸）
ActiveDocument.Sections.Item(1).PageSetup.Gutter =36
在当前活动文件格式第2段之前加进两个””连续””的分节符。
Set myRange = ActiveDocument.Paragraphs(3).Range
ActiveDocument.Sections.Add Range:=myRange, Start:=wdSectionContinuous
End Sub
代码截图：
代码运行前：
代码运行后：
本周一文本回向：
1 Word中Sections第一类的PageSetup 特性、Add 方式、Item 方式的意义是什么？
2如何借助VBA设置节的页面及插入新的节？
本讲文本参考程序文件：Doc 008文件格式.docm
我20多年的VBA实践经验，全部浓缩在下面的各个讲义及应用领域工具中：
【撷取丰硕成果，Q1566A正能量】走到山穷水尽处，坐看云起云涌，把每一天，过得极致，用得极致，活得极致。。
