excel - 如何在 VBA 中定义下一个循环的范围

Question

我是一个新手，我正在尝试学习 VBA(对不起，英语有任何错误，我不是母语人士)。
我正在尝试解决以下任务:
“创建一个程序，在Excel中输出11到20的乘法表值，如下图:”

multiplication table

这是我的代码:

Sub einmaleins()
Dim x As Integer, y As Integer
For x = 11 To 20
For y = 11 To 20
Cells(x, y) = x * y
Next
Next
End Sub

它可以工作，但会将 table 从 K11 放到 S20。我需要它来输入从 A1 到 J10 的值
我努力了

*Range("A1:J10").FormulaR1C1 = "=ROW(RC)*COLUMN(RC)"* 

但它不起作用。

非常感谢帮助

Answer 1

实际上，您的公式方法更好，因为可以避免循环。

Range("A1:J10").FormulaR1C1 = "=(ROW(RC)+10)*(COLUMN(RC)+10)"