age对象的默认属性(age对象的什么属性可以在单元格中输入公式)
导语：Range对象的Collapse、Next和Previous方法
【分享成果，随喜正能量】人生必需品，无非三样：经济独立、人格健全、身体健康。其他种种，都是浮云。可惜的是，对于许多人来说，这些都是奢侈品。多赚点钱，可以解决人生大部分问题。赚钱的能力像其他能力一样，是可以不断学习、练习、提升的。薪水不够的话，试试兼职、副业。
《VBA之Word应用》，是我推出第八套教程，教程是专门讲解VBA在Word中的应用，围绕“面向对象编程”讲解，首先让大家认识Word中VBA的对象，以及对象的属性、方法，然后通过实例让大家感受到Word VBA 的妙处。本套教程共三册十六章，今日内容是第五章“Word中的Range对象（上）”第10节：Word中Range对象的Collapse、Next和Previous方法。
第十节 Range对象的方法（四）大家好，我们继续Range对象的方法学习，这讲的内容是掌握Collapse方法、Next方法和Previous方法。
1 Range.Collapse 方法该方法将某一区域或所选内容折叠到起始位置或结束位置。 折叠之后起始位置和结束位置相同。
语法：expression.Collapse(Direction)
其中expression 是必需的，是一个代表 Range 对象的变量。
参数：Direction 可选Variant 折叠某区域或所选内容的方向。可以是wdCollapseEnd或wdCollapseStart。 默认值是 wdCollapseStart 。
2 Range.Next 方法该方法返回一个Range对象, 该对象代表相对于指定范围的指定的单位。
语法：expression.Next (Unit, Count)
其中expression 是必需的，是一个代表 Range 对象的变量。
参数：
1）Unit 可选 Variant 要计算的单位类型。 可以是任何WdUnits常量。
2）Count 可选 Variant 要向前移动的单位数。 默认值为 1
3 Range.Previous 方法该方法返回相对于指定范围的前一个范围。
语法：expression.Previous (Unit, Count)
其中expression 是必需的，是一个代表 Range 对象的变量。
参数：
1）Unit 可选 Variant 要计算的单位类型。 可以是任何WdUnits常量。
2）Count 可选 Variant 要向前移动的单位数。 默认值为 1
4 实例：所选范围的上一个单元和下一个单元我们来根据实例的代码来掌握一些上面两个方法的应用，这个应用中会看到所选范围的上一个单元及下一个单元的调整。代码：
Sub mynzI()
&39;将第一段下移两个段落
Selection.Range.Next(Unit:=wdParagraph, Count:=2).Select
&39;设置第一段倒数第5个词语的格式
With ActiveDocument.Words(ActiveDocument.Paragraphs(1).Range.Words.Count).Previous(Unit:=wdWord, Count:=5)
.Bold = True
.Font.Size = 17
End With
End Sub
代码截图：
代码的解读：
1）&39;将第一段下移两个段落
Selection.Range.Next(Unit:=wdParagraph, Count:=2).Select
以上代码选择当前活动文档的第一段选择下移两个段落
3)&39;设置第一段倒数第5个词语的格式
With ActiveDocument.Words(ActiveDocument.Paragraphs(1).Range.Words.Count)
.Previous(Unit:=wdWord, Count:=5)
.Bold = True
.Font.Size = 17
End With
以上代码设置第一段倒数第5个词语的格式。
下面看代码的运行结果：
今日内容回向：
1 Word中Range对象的Collapse方法、Next方法和Previous方法的意义是什么？
2 如何实现范围的上下单元的扩展？
本讲内容参考程序文件：Doc 005文档.docm
我20多年的VBA实践经验，全部浓缩在下面的各个教程中：
【分享成果，随喜正能量】拿你有的，换你要的。这个世界一直如此，很残酷，也很公平。从来没有一劳永逸的选择。关键是选择之后，你该做些什么。
本文内容由快快网络小洁创作整理编辑！