|
|
Регистрация Восстановить пароль |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
13.10.2018, 22:04 | #1 |
Новичок
Джуниор
Регистрация: 13.10.2018
Сообщений: 1
|
Макрос по кнопке
Нужно,чтобы по кнопке на поле срабатывал макрос. Смысл макроса: есть два столбца (в первом количество товара, во втором стоимость) нужно просуммировать стоимость всех товаров, где кол-во больше 50. Ошибки в моем коде наверное детские, но для меня не очевидные. Пробовала определять массивы через лонг и счетчик не до 1000 а через UBoun, не спасло.Помогите.
Private Sub CommandButton1_Click() Dim arrKol Dim arrStoim Dim summa As Long Dim i As Integer summa = 0 i = 0 arrKol = [D18:D1017] arrStoim = [F18:F1017] For i = 1 To 1000 If arrKol(i) > 50 Then summa = summa + arrStoim(i) End If Next i Cells(10, 4) = summa End Sub |
17.10.2018, 13:25 | #2 |
Форумчанин
Регистрация: 17.10.2018
Сообщений: 184
|
Код:
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Как присвоить кнопке макрос? | КаМММ | Microsoft Office Excel | 2 | 11.01.2018 08:48 |
Как прописать макрос в кнопке? | Benidorm | Microsoft Office Excel | 3 | 20.09.2017 15:38 |
КАК назначить макрос кнопке? | Андрей232 | Microsoft Office Excel | 9 | 27.10.2012 15:11 |
Макрос текущего времени и привязка его к кнопке | Severny | Microsoft Office Excel | 16 | 08.04.2011 14:36 |