1

我有一个宏,可以选择工作表中的内容。

在运行宏的主要部分之前,我想保存活动选择,以便我可以在宏的末尾设置相同的选择。

我已经尝试了下面的解决方案,但它不起作用。我很感激建议。

Dim rng As Range

'Beginning of macro
rng = Range(ActiveSheet.Selection) 'Object doesn't support this property or method

'Main section

'End of macro
rng.Select
4

2 回答 2

3

而不是rng = Range(ActiveSheet.Selection),它应该是Set rng = Selection

于 2013-09-30T12:32:56.350 回答
3

提供的解决方案tmoore82是最好的方法 (+1)

为了完整起见,您还可以将其另存Address为字符串:

Dim selectionAddress as String
selectionAddress = Selection.Address 'e.g. A1 is "$A$1"

'Your macro

Range(selectionAddress).Select 'At end of macro select cell A1
于 2013-09-30T12:44:01.517 回答