完成重写,因为这在某种程度上太宽泛了。
Sub copypaste()
Dim source As String
Dim destination As String
source = A.Range("A1").Value
destination = A.Range("A3").Value
A.Range(destination) = A.Range(source)
End Sub
这就是我的代码。它不起作用。
简单地说:
我想使用单元格A1中提供的值作为要复制的单元格的范围地址。
我想使用单元格A3中提供的值作为要粘贴到的单元格的范围地址。
我是:
在以下内容中未正确使用它:
A.Range(destination) = A.Range(source
)
或者我完全想不到其他东西,无法在线找到它。
我来这里之前询问过这里。在来这里询问之前,我还插入了Excel中的VBA环境。
如果这不是一个足够具体的问题,请友好地告诉我该问题的含糊或广泛之处,因为我不能将其视为对我可以使用的特定概念的特定问题在以后的Macros / Subs / etc中。
这不是家庭作业。除了成为永恒的学生,我不是学生。我正在利用业余时间尝试构建工具以简化工作。
我唯一需要知道的是如何将单元格(任何单元格)中的值传递到变量中,以将该变量用作范围。
如果那不可能,请冷静。我想这是Excel的局限性,我会找到其他途径。
答案 0 :(得分:-2)
要复制的单元格 范围(“ A1”)。选择
功能副本 选择。复制
要粘贴的单元格 范围(“ J7”)。选择
功能粘贴 ActiveSheet。粘贴