快捷搜索:  汽车  科技

section怎么设置窗口(利用Section对象的方法及属性完成页面设置)

section怎么设置窗口(利用Section对象的方法及属性完成页面设置)其中expression 是必需的。 一个代表 "Sections" 集合的变量。语法:expression.Add(Range Start)语法:expression.PageSetup其中expression 是必需的。 一个代表 "Sections" 集合的变量。这个属性方法返回一个Section对象,该对象代表添加到文档中的新节。

分享成果,随喜正能量】凡事不要太过计较,发生了就选着接受,不要太过强求,因为,一切都是最好的安排!。

《VBA之Word应用》,是我推出第八套教程,教程是专门讲解VBA在Word中的应用,围绕“面向对象编程”讲解,首先让大家认识Word中VBA的对象,以及对象的属性、方法,然后通过实例让大家感受到Word VBA 的妙处。本套教程共三册十六章,今日内容第八章: Sections对象和Section对象的第2节:利用Section对象的方法及属性完成页面设置

section怎么设置窗口(利用Section对象的方法及属性完成页面设置)(1)

第二节 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)wdSectionEvenPage 3 “偶数页”分节符.

3)wdSectionNewColumn 1 “新栏”分节符.

4)wdSectionNewPage 2 “新页”分节符.

5)wdSectionOddPage 4 “奇数页”分节符.

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

代码截图:

section怎么设置窗口(利用Section对象的方法及属性完成页面设置)(2)

代码运行前:

section怎么设置窗口(利用Section对象的方法及属性完成页面设置)(3)

代码运行后:

section怎么设置窗口(利用Section对象的方法及属性完成页面设置)(4)

今日内容回向:

1 Word中Sections对象的PageSetup 属性、Add 方法、Item 方法的意义是什么?

2 如何利用VBA设置节的页面及插入新的节?

本讲内容参考程序文件:Doc 008文档.docm

section怎么设置窗口(利用Section对象的方法及属性完成页面设置)(5)

我20多年的VBA实践经验,全部浓缩在下面的各个教程及应用工具中:

section怎么设置窗口(利用Section对象的方法及属性完成页面设置)(6)

section怎么设置窗口(利用Section对象的方法及属性完成页面设置)(7)

section怎么设置窗口(利用Section对象的方法及属性完成页面设置)(8)

分享成果,随喜正能量】走到山穷水尽处,坐看云起云涌,把每一天,过得极致,用得极致,活得极致。。

猜您喜欢: