Операции сложения/умножения в VBA/Excel.

14.04.2010, 01:29. **Показов** 4650. **Ответов** 2

Author24 — интернет-сервис помощи студентам

Добрый вечер, уважаемые программисты. Прошу помощи в решении задачи - написании кода в VBA для операций сложения и умножения в Excel. Перепробовала разные варианты, но программа не работает.
Сразу оговорюсь, что в VBA я, к сожалению, полный "чайнЕГ"; "работаю" в нем всего второй день - пытаюсь помочь племяннику выполнить домашнее задание.
Прилагаю файл с заданием и наши отчаянные попытки его выполнить.

Visual Basic

Sub Расчет_комиссионного_вознаграждения()
    Application.CommandBars("Visual Basic").Visible = True
    Application.CommandBars("Visual Basic").Visible = False
    Range("D4").Activate
    Cells(4, 4) = 372
    Cells(4, 5) = 302
    Cells(4, 6) = 352
    Range("C4").Select
    ActiveCell.FormulaLocal = "=СУММ (D4;E4;F4)"
End Sub

А еще сумму пытались найти так:

Visual Basic

1 2	Range("C4").Select ActiveCell.FormulaR1C1 = "=Summ(R[D4]R[E4]R[F4])"

Еще были варианты, но они совсем не годились, весь код становился разноцветным.
Скачала книги по VBA, но там преимущественно рассматриваются разные циклы.
Буду очень благодарна за помощь.

@YuraAAA · 14.04.2010, 02:16

Эээ...Вы пробел уберите,между СУММ и скобками, и всё будет работать

Visual Basic

1	ActiveCell.FormulaLocal = "=СУММ(D4;E4;F4)"

14.04.2010, 02:22

Огромное Вам спасибо!!!!!

Действительно все работает!!

Amiran
	14.04.2010, 02:22	3
	Огромное Вам спасибо!!!!! Действительно все работает!!