Excel, макрос, ввод и вывод тригонометрических функций

[vitaliyMan]

Нужен макрос.

1. Записать значения элементов массива в ячейки таблицы.
2. В программе реализовать ввод значений элементов из ячеек в массив.
3. Вычислить сумму элементов массива (применив двойной цикл) и вывести ее в окошко.
4. Найти максимальный элемент в массиве, для чего:
4.1 Принимаем за максимум первый элемент массива (1,1).
4.2 уравнивает в цикле с текущим максимумом каждый следующий элемент. Если он больше за максимум, то присваиваем ему это имя. Записываем его "координаты" (i, j).
4.3 Вывести значение максимума и его координаты в окошко.

Добавлено через 3 минуты
457 200
20 192
4 1224
70 845
100 706
6 700
400 308
179 218

[andrew_main]

http://programmersforum.ru/showthread.php?t=220671
вот тут ползадачи, или это не поможет?

если совсем не поможет - есть аська, не вопрос )))

[DiemonStar]

Sub ff()
  Dim A(1 To 3, 1 To 2) As Integer, R As Range
   A(1, 1) = 1
   A(1, 2) = 5
   A(2, 1) = 7
   A(2, 2) = 2
   A(3, 1) = 9
   A(3, 2) = 9
   Set R = [A1].Resize(UBound(A, 1), UBound(A, 2))
   R = A
   B = R
   [F1].Resize(UBound(B, 1), UBound(B, 2)) = B
   
   [D1] = Evaluate("Max(" & R.Address & ")")
   [D2] = Evaluate("Sum(" & R.Address & ")")
End Sub

вот вам примерчик, как можно сделать практически всё ваше задание

[vitaliyMan]

Огромное спасибо!
Выручили!