Excel 将单元格分配给变量，并将变量分配给另一个单元格

我是VBA的完全初学者，很抱歉提出这个简单的问题：

我想将单元格A1分配给变量'num'，然后将'num'乘以4，将新值分配给'num2'，然后将结果打印到单元格A2

如果您能帮助我，我可以自己进行： 谢谢

考虑：

Sub demo()
    Dim num As Long, num2 As Long
    num = [A1] * 4
    num2 = num
    [A2] = num2
End Sub

---

即使这样也不会直接将变量分配给单元格取决于您想要分配的内容：单元格本身？它的地址？价值呢？另一种可能性是，如果A1发生变化，则A2需要始终更改，这基本上是在A2单元格中插入公式：

Sub demo()
    ThisWorkbook.ActiveSheet.Range("A2").Formula = "=4*" & ThisWorkbook.ActiveSheet.Range("A1")
End Sub

请注意，此处的ActiveSheet可以是您要使用的任意一张图纸，您可以使用WorksheetWorksheetName或WorksheetWorksheetPosition选择不同的图纸。

---

当然，只有当你只需要对你的单元格乘以4时，这才有效。我认为使用不必要的变量是不好的

那么：

Sub demo()
[A2] = [A1] * 4
end sub

---

嗯，确切地说，除了另一个变量之外，同样的东西不是不必要的，它稍后会被使用-但是这是关于这个问题的不必要的信息，所以我把它省略了。在这个例子中，我把它放在里面，这样有人可以告诉我如何将一个变量赋值给另一个变量，因为我不知道。这就是为什么它是必要的