返回一个数组,数组中包括最近选定的 4 个区域或者名称。此数组中的每一个元素是一个 Range 对象。Variant 类型,只读。
expression.PreviousSelections(Index)
expression 可选。该表达式返回一个 Application 对象。
Index Variant 类型,可选。前面区域或者名称的索引号(从 1 到 4)。
每次使用“名称”框或者用“编辑”菜单中的“定位”命令转到另一个区域或者另一个单元格,或者每次宏调用 Goto 方法时,前一区域就会被记录到数组的第一个元素中,其他元素依次向下顺延。
本示例显示前一次选定的数组中所有项的单元格地址。如果前一次没有选定任何内容,则 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"