VBA Вывести таблицу Пифагора в виде матрицы 10 X 10. Каждый элемент матрицы в таблице Пифагора вычисляется по формуле а= i * j.

[dimadon456]

Знаю, что эти задания для многих тут покажутся простыми, но мне как новичку,что-то сложно

1.Вывести таблицу Пифагора в виде матрицы 10 X 10. Каждый элемент матрицы в таблице Пифагора вычисляется по формуле а= i * j.

Второе задание выполняется в excele
2.Заданы натуральные числа A, B, C. Сколько чисел, кратных С, со-держится в интервале [А, В]?

Вот чушь,которую я творю в первом задании

PHP код:

Private Sub CommandButton1_Click()
m = Val(InputBox("m"))
n = Val(InputBox("n"))
ReDim A(1 To m, 1 To n) As Single
A(1, 1) = 1
A(1, 2) = 2
A(1, 3) = 3
A(1, 4) = 4
A(1, 5) = 5
A(1, 6) = 6
A(1, 7) = 7
A(1, 8) = 8
A(1, 9) = 9
A(1, 10) = 10
A(2, 1) = 2
A(2, 2) = 3
A(2, 3) = 4
A(2, 4) = 5
A(2, 5) = 6
A(2, 6) = 7
A(2, 7) = 8
A(2, 8) = 9
A(2, 10) = 10
For i = 2 To m
For j = 2 To n
A(i, j) = InputBox("введите a(" & i & "," & j & ")")
Next j
Next i
For i = 2 To m
For j = 2 To n
A(i, j) = InputBox("введите a(" & i & "," & j & ")")
Next j
Next i
Dim stra As String
For i = 1 To m
stra = ""
For j = 1 To n
stra = stra + " " + Str(A(i, j))
Next j
Next i
For i = 2 To m
For j = 2 To n
A = i * j
ListBox1.AddItem stra
Next j
Next i
End Sub 


А второе я вообще не въеду как делать, так как никто мне не объяснял как пользоваться объектами range или cells, а с помощью инета всемогущего я чет не разобрался((

Помогите, пожалуйста!!