Range对象的Collapse、Next和Previous方法

内容导航：

Range对象的Collapse、Next和Previous方法

如何使用C#操作幻灯片

关于excel的VBA，里面的单元格格式的属性有哪些，有哪些参数？

jquery既然有next方法取得下一个元素，那么有previous方法吗

一、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()

'选择当前活动文档的第一段

Set myRange = ActiveDocument.Paragraphs(1).Range

myRange.Select

'将第一段下移两个段落

Selection.Range.Next(Unit:=wdParagraph, Count:=2).Select

'弹出此时选择的文本

MsgBox Selection.Text

'设置第一段倒数第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）'选择当前活动文档的第一段

Set myRange = ActiveDocument.Paragraphs(1).Range

myRange.Select

以上代码选择当前活动文档的第一段

2）'将第一段下移两个段落

Selection.Range.Next(Unit:=wdParagraph, Count:=2).Select

以上代码选择当前活动文档的第一段选择下移两个段落

3)'弹出此时选择的文本

MsgBox Selection.Text

以上代码提示此时的选择段落的内容。

4）'设置第一段倒数第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实践经验，全部浓缩在下面的各个教程中：

【分享成果，随喜正能量】拿你有的，换你要的。这个世界一直如此，很残酷，也很公平。从来没有一劳永逸的选择。关键是选择之后，你该做些什么。

一、如何使用C#操作幻灯片

实现思路
1、既然要实现的程序是遥控幻灯片，这样我们就需要先获得幻灯片应用程序的，在PowerPoint对象模型
中，Microsoft.Office.Interop.PowerPoint.Application代表Powerpoint应用程序，这点和
Word、Excel和Outlook都是一样的。
2、获得了幻灯片应用程序对象之后，之后我们就需要获得幻灯片对象，因为我们遥控的是幻灯片，在PowerPoint对象模型中也提供了幻灯片对象，即
Microsoft.Office.Interop.PowerPoint.Slide。由于幻灯片又是存在于演示文稿中的，所以我们要想获得幻灯片对
象，就需要先获得演示文稿对象，Microsoft.Office.Interop.PowerPoint.Presentation
就是代表演示文稿对象。
3、获得幻灯片对象之后，我们就可以利用幻灯片对象的Select方法来进行幻灯片的切换,然而在阅读模式的情况下，不能用Select方法来进行翻页，
此时需要另一种方式来实现，即调用
Microsoft.Office.Interop.PowerPoint.SlideShowView对象的
First，Next,Last,Previous方法来进行幻灯片翻页
下面一张是阅读模式下程序中实现翻页功能与在幻灯片中的对应关系：
遥控幻灯片程序的实现
有了上面的解释，我们再看下面的实现代码时，相信大家肯定不会觉得有任何难道了，下面就直接贴出部分的实现的代码
///

///
检查是否打开幻灯片程序
///

///

///

privatevoid
btnCheck_Click(object
sender,
EventArgs
e)
{
//
必须先运行幻灯片，下面才能获得PowerPoint应用程序，否则会出现异常
//
获得正在运行的PowerPoint应用程序
try
{
pptApplication
=
Marshal.GetActiveObject("PowerPoint.Application")
as
PPt.Application;
//
成功获取了PowerPoint程序时，使UI按钮可用
this.btnFirst.Enabled
=
true;
this.btnNext.Enabled
=
true;
this.btnPrev.Enabled
=
true;
this.btnLast.Enabled
=
true;
}
catch
{
MessageBox.Show("请先启动遥控的幻灯片",
"Error",
MessageBoxButtons.OKCancel,
MessageBoxIcon.Error);
}
if
(pptApplication
!=
null)
{
//获得演示文稿对象
presentation
=
pptApplication.ActivePresentation;
//
获得幻灯片对象集合
slides
=
presentation.Slides;
//
获得幻灯片的数量
slidescount
=
slides.Count;
//
获得当前选中的幻灯片
try
{
//
在普通视图下这种方式可以获得当前选中的幻灯片对象
//
然而在阅读模式下，这种方式会出现异常
slide
=
slides[pptApplication.ActiveWindow.Selection.SlideRange.SlideNumber];
}
catch
{
//
在阅读模式下出现异常时，通过下面的方式来获得当前选中的幻灯片对象
slide
=
pptApplication.SlideShowWindows[1].View.Slide;
}
}
}
//
第一页事件
privatevoid
btnFirst_Click(object
sender,
EventArgs
e)
{
try
{
//
在普通视图中调用Select方法来选中第一张幻灯片
slides[1].Select();
slide
=
slides[1];
}
catch
{
//
在阅读模式下使用下面的方式来切换到第一张幻灯片
pptApplication.SlideShowWindows[1].View.First();
slide
=
pptApplication.SlideShowWindows[1].View.Slide;
}
}
下面就看看该遥控程序的运行效果是如何的:

二、关于excel的VBA，里面的单元格格式的属性有哪些，有哪些参数？

range,cell属性

名称 说明
AddIndent 返回或设置一个 Variant 值，它指明当单元格中文本的对齐方式为水平或垂直等距分布时，文本是否为自动缩进。
Address 返回一个 String 值，它代表宏语言的区域引用。
AddressLocal 以用户语言返回对指定区域的区域引用。String 类型，只读。
AllowEdit 返回一个 Boolean 值，它指明是否可以在受保护的工作表上编辑区。域。
Application 如果不使用对象识别符，则该属性返回一个 Application 对象，该对象表示 Microsoft Excel 应用程序。如果使用对象识别符，则该属性返回一个表示指定对象（可对一个 OLE 自动操作对象使用本属性来返回该对象的应用程序）创建者的 Application 对象。只读。
Areas 返回一个 Areas 集合，该集合表示多重区域选择中的所有区域。只读。
Borders 返回一个 Borders 集合，它代表样式或单元格区域（包括定义为条件格式一部分的区域）的边框。
Cells 返回一个 Range 对象，它代表指定单元格区域中的单元格。
Characters 返回 Characters 对象，它代表对象文本内某个区域的字符。使用 Characters 对象可为文本字符串内的字符设置格式。
Column 返回指定区域中第一块中的第一列的列号。Long 类型，只读。
Columns 返回一个 Range 对象，它代表指定区域中的列。
ColumnWidth 返回或设置指定区域中所有列的列宽。Variant 类型，可读写。
Comment 返回一个 Comment 对象，它代表与区域左上角单元格相关联的批注。
Count 返回一个 Long 值，它代表集合中对象的数量。
CountLarge 在指定区域的值中计算最大值。只读 Variant 类型。
CurrentArray 如果指定单元格属于数组，则返回一个 Range 对象，该对象表示整个数组。只读。
CurrentRegion 返回一个 Range 对象，该对象表示当前区域。当前区域是以空行与空列的组合为边界的区域。只读。
Dependents 返回一个 Range 对象，该对象表示包含一个单元格所有从属单元格的区域。如果有多个从属单元格，这可能有多个选择（多个 Range 对象）。Range 类型，只读。
DirectDependents 返回一个 Range 对象，该对象表示包含一个单元格的所有直接从属单元格的区域。如果有多个从属单元格，这可能有多个选择（多个 Range 对象）。Range 类型，只读。
DirectPrecedents 返回一个 Range 对象，该对象表示包含一个单元格的所有直接引用单元格的区域。如果有多个引用单元格，这可能有多个选择（多个 Range 对象）。Range 对象，只读。
End 返回一个 Range 对象，该对象代表包含源区域的区域尾端的单元格。等同于按键 End+ 向上键、End+ 向下键、End+ 向左键或 End+ 向右键。Range 对象，只读。
EntireColumn 返回一个 Range 对象，该对象表示包含指定区域的整列（或多列）。只读。
EntireRow 返回一个 Range 对象，该对象表示包含指定区域的整行（或多行）。只读。
Errors 允许用户访问错误检查选项。
Font 返回一个 Font 对象，它代表指定对象的字体。
FormatConditions 返回一个 FormatConditions 集合，该集合表示指定区域的所有条件格式。只读。
Formula 返回或设置一个 Variant 值，它代表 A1 样式表示法和宏语言中的对象的公式。
FormulaArray 返回或设置区域的数组公式。返回（或可设置为）单个公式或 Visual Basic 数组。如果指定区域不包含数组公式，则该属性返回 null。Variant 类型，可读写。
FormulaHidden 返回或设置一个 Variant 值，它指明在工作表处于保护状态时是否隐藏公式。
FormulaLocal 返回或设置指定对象的公式，使用用户语言 A1 格式引用。Variant 型，可读写。
FormulaR1C1 返回或设置指定对象的公式，使用宏语言 R1C1 格式符号表示。Variant 型，可读写。
FormulaR1C1Local 返回或设置指定对象的公式，使用用户语言 R1C1 格式符号表示。Variant 型，可读写。
HasArray 如果指定单元格属于数组公式，则该属性值为 True。Variant 类型，只读。
HasFormula 如果区域中所有单元格均包含公式，则该属性值为 True；如果所有单元格均不包含公式，则该属性值为 False；其他情况下为 null。Variant 类型，只读。
Height 返回或设置一个 Variant 值，该值代表区域的高度（以磅为单位）。
Hidden 返回或设置一个 Variant 值，它指明是否隐藏行或列。
HorizontalAlignment 返回或设置一个 Variant 值，它代表指定对象的水平对齐方式。
Hyperlinks 返回 Hyperlinks 集合，它代表区域的超链接。
ID 返回或设置一个 String 值，它代表将页面另存为网页时指定单元格的识别标志。
IndentLevel 返回或设置一个 Variant 值，它代表单元格或单元格区域的缩进量。可为 0 到 15 之间的整数。
Interior 返回一个 Interior 对象，它代表指定对象的内部。
Item 返回一个 Range 对象，它代表对指定区域某一偏移量处的区域。
Left 返回一个 Variant 值，它代表从列 A 的左边缘到区域的左边缘的距离（以磅为单位）。
ListHeaderRows 返回指定区域中标题行的数目。Long 类型，只读。
ListObject 为 Range 对象返回一个 ListObject 对象。ListObject 对象，只读。
LocationInTable 返回一个常量，该常量描述包含指定区域左上角部分的 PivotTable 部分。可为以下 XlLocationInTable 常量之一。Long 类型，只读。
Locked 返回或设置一个 Variant 值，它指明对象是否已被锁定。
MDX 返回指定的 Range 对象的 MDX 名称。只读 String 类型。
MergeArea 返回一个 Range 对象，该对象代表包含指定单元格的合并区域。如果指定的单元格不在合并区域内，则该属性返回指定的单元格。只读。Variant 类型。
MergeCells 如果区域包含合并单元格，则为 True。Variant 型，可读写。
Name 返回或设置一个 Variant 值，它代表对象的名称。
Next 返回一个代表下一个单元格的 Range 对象。
NumberFormat 返回或设置一个 Variant 值，它代表对象的格式代码。
NumberFormatLocal 以采用用户语言字符串的形式返回或设置一个 Variant 值，它代表对象的格式代码。
Offset 返回 Range 对象，它代表位于指定单元格区域的一定的偏移量位置上的区域。
Orientation 返回或设置一个 Variant 值，它代表文本方向。
OutlineLevel 返回或设置指定行或列的当前分级显示级别。Variant 类型，可读写。
PageBreak 返回或设置分页符的位置。可为以下 XlPageBreak 常量之一：xlPageBreakAutomatic、xlPageBreakManual 或 xlPageBreakNone。Long 类型，可读写。
Parent 返回指定对象的父对象。只读。
Phonetic 返回 Phonetic 对象，该对象包含有关某个单元格中指定拼音文本字符串的信息。
Phonetics 返回区域的 Phonetics 集合。只读。
PivotCell 返回一个 PivotCell 对象，该对象表示数据透视表中的一个单元格。
PivotField 返回一个 PivotField 对象，它代表指定区域左上角所在的数据透视表字段。
PivotItem 返回一个 PivotItem 对象，它代表指定区域左上角所在的数据透视表项。
PivotTable 返回一个 PivotTable 对象，它代表指定区域左上角所在的数据透视表。
Precedents 返回一个 Range 对象，该对象表示单元格的所有引用单元格。如果有多个引用单元格，则可以是一个多重选择（Range 对象的并集）。只读。
PrefixCharacter 返回单元格的前缀字符。Variant 类型，只读。
Previous 返回一个代表下一个单元格的 Range 对象。
QueryTable 返回一个 QueryTable 对象，它代表与指定 Range 对象相交的查询表。
Range 返回一个 Range 对象，它代表一个单元格或单元格区域。
ReadingOrder 返回或设置指定对象的阅读次序。可为以下常量之一：xlRTL（从右到左）、xlLTR（从左到右）或 xlContext。Long 类型，可读写。
Resize 调整指定区域的大小。返回 Range 对象，该对象代表调整后的区域。
Row 返回区域中第一个子区域的第一行的行号。Long 类型，只读。
RowHeight 以磅为单位返回或设置指定区域中所有行的行高。如果指定区域中的各行的行高不等，则返回 null。Variant 类型，可读写。
Rows 返回一个 Range 对象，它代表指定单元格区域中的行。Range 对象，只读。
ServerActions 指定可在 SharePoint 服务器上对 Range 对象执行的操作。
ShowDetail 如果扩展了指定区域的分级显示（从而行或列的明细数据可见），则为 True。指定区域必须为分级显示中的单个汇总列或汇总行。Variant 型，可读写。对于 PivotItem 对象（如果该区域在数据透视表中，则为 Range 对象），当数据项显示明细数据时，此属性设为 True。
ShrinkToFit 返回或设置一个 Variant 值。
SmartTags 返回一个 SmartTags 对象，它代表指定单元格的标识符。
SoundNote 本属性不应再被使用。语音批注已从 Microsoft Excel 中删除。
Style 返回或设置一个包含 Style 对象的 Variant 值，它代表指定区域的样式。
Summary 如果指定区域为分级显示的汇总行或汇总列，则该值为 True。该区域应为一行或一列。Variant 类型，只读。
Text 返回或设置指定对象中的文本。String 型，只读。
Top 返回或设置一个 Variant 值，它代表行 1 上边缘到区域上边缘的距离（以磅为单位）。
UseStandardHeight 如果 Range 对象的行高等于工作表的标准行高，则该值为 True。如果区域包含不止一行并且不是所有的行都等高，则返回 Null。Variant 类型，可读写。
UseStandardWidth 如果 Range 对象的列宽等于工作表的标准列宽，则该属性的值为 True。如果区域包含不止一列并且不是所有的列都等宽，则返回 null。Variant 类型，可读写。
Validation 返回一个 Validation 对象，该对象表示指定区域的数据有效性检验。只读。
Value 返回或设置一个 Variant 型，它代表指定单元格的值。
Value2 返回或设置单元格值。Variant 类型，可读写。
VerticalAlignment 返回或设置一个 Variant 值，它代表指定对象的垂直对齐方式。
Width 返回一个 Variant 值，它代表区域的宽度（以磅为单位）。
Worksheet 返回一个 Worksheet 对象，该对象表示包含指定区域的工作表。只读。
WrapText 返回或设置一个 Variant 值，它指明 Microsoft Excel 是否为对象中的文本自动换行。
XPath 返回一个 XPath 对象，它代表映射到指定 Range 对象的元素的 XPath。该区域的上下文确定操作是否成功，或返回空对象。只读。

三、jquery既然有next方法取得下一个元素，那么有previous方法吗

有，prev()方法， 使用方法如下：

$("p").prev(".selected")

参考地址：