范围("R2").值 = ActiveCell.地址

范围("R2").值 = ActiveCell.地址

该地址出现在单元格 R2 中后,是否可以以某种方式使用该地址?到目前为止,我已经能够通过在复制单元格的宏末尾输入该行来获取我复制的单元格的地址,并将其放入单元格 R2 中。现在,我希望能够在将其粘贴到另一个单元格后返回到该单元格,以便清除它。

在将其粘贴到其他地方后,仍在尝试(复制、选择性粘贴、清除复制的单元格)。

提前致谢。

答案1

我终于找到了我所寻找的东西。

在我的代码中添加的这两行都可以返回到复制的单元格并将其清除。这可能不是最好的方法,但它确实做到了我想要的效果。

Range(Range("R2")).Select
Selection.ClearContents

或者

Range([indirect("R2")]).Select
Selection.ClearContents

因此,我有一个用于复制的宏,当Ctrl+c按下时,它会像普通复制一样复制活动单元格,但它也会将活动单元格的地址放在 R2 中。

然后我有一个ctrl+v仅粘贴值然后返回到复制的单元格并清除它。

相关内容