Application.PreviousSelections 属性 (Excel)

返回最后选择的四个区域或名称的数组。 数组中的每个元素都是 一个 Range 对象。 只读变体。

语法

表达式。PreviousSelections (Index)

expression：表示 Application 对象的变量。

参数

名称	必需/可选	数据类型	说明
Index	可选	Variant	前一区域或者名称的索引号（从 1 到 4）。

备注

每次使用 “名称 ”框或“ 转到 ”命令 (“编辑 ”菜单) 转到某个区域或单元格时，或者每次宏调用 Goto 方法时，上一个区域将作为元素数字 1 添加到此数组，并且数组中的其他项将向下移动。

示例

本示例显示前一次选定的数组中所有项的单元格地址。 如果前一次没有选定任何内容，则 LBound 函数将返回一个出错标志。 该错误将被捕获，并显示一个消息框。

On Error GoTo noSelections 
For i = LBound(Application.PreviousSelections) To _ 
 UBound(Application.PreviousSelections) 
 MsgBox Application.PreviousSelections(i).Address 
Next i 
Exit Sub 
On Error GoTo 0 
 
noSelections: 
 MsgBox "There are no previous selections"

支持和反馈

有关于 Office VBA 或本文档的疑问或反馈？ 请参阅 Office VBA 支持和反馈，获取有关如何接收支持和提供反馈的指南。