Коллеги, добрый вечер.
Вопрос очень простой, даже не вижу необходимости скидывать пример.
VBA ругается на мой кривой макрос, не знаю как записать.
Суть: Нужно, чтобы результат в колонке 11 = произведению колонки 9 8 и 7 деленный на 1млн, короче считаем объем построчно.
Вопрос элементарный.На форуме признаюсь долго не искал
Вопрос очень простой, даже не вижу необходимости скидывать пример.
VBA ругается на мой кривой макрос, не знаю как записать.
Суть: Нужно, чтобы результат в колонке 11 = произведению колонки 9 8 и 7 деленный на 1млн, короче считаем объем построчно.
Вопрос элементарный.На форуме признаюсь долго не искал
| Код |
|---|
Dim ans As String
Dim ans1 As String
Dim str As Long
ans = MsgBox("ммм", vbYesNo)
If ans = vbYes Then
For str = 1 To 30000
Cells(str, 11).Value = Cells(str, 9).Value * Cells(str, 8).Value * Cells(str, 7).Value
Next str
Else
ans1 = MsgBox("ммм", vbOKOnly)
End If
End Sub
|
