Модератор
Сообщения: 16826 Благодарности: 3244
Профиль | Сайт | Отправить PM | Цитировать
Function SUMSQ(Scalar, Interval As Range) SUMSQ = 0 For Each c In Interval SUMSQ = SUMSQ + (Scalar - c) ^ 2 Next End Function
------- При заполнении сведений о конфигурации компьютера не забудь поставить флажок: отображать - "Да" ------------------------------------------------------------------------------------------- Ассоциация VirusNet - помощь и обучение борьбе с вирусами. Некоторые вопросы загрузки в моем блоге
Отправлено: 11:17, 31-12-2011 | #6