Поиск  Пользователи  Правила 
Закрыть
Логин:
Пароль:
Забыли свой пароль?
Регистрация
Войти
 
Страницы: 1
RSS
Макрос суммирования в динамичных диапазонах
 
Добрый день!
Помогите пожалуйста с написанием макроса
Основная задача: посчитать количество минут.
Есть детализация звонков наших клиентов. В одном файле по нескольким номерам. Продолжительность разговора (в столбце Н) округляется до целой минуты в столбце U.
Столбец S где напротив "Итог по абоненту" стоит ЛОЖЬ или ИСТИНА нужен для определения верной тарификации.
Необходимо, в столбце U, где минутки, в ячейке напротив "Итог по абоненту" ставить формулу суммы.
Сейчас я делаю это вручную кнопкой СУММА, и диапазон определяется автоматически (ровно до предыдущего такого суммирования)
Не пойму как мне написать макрос на эту сумму.
Вероятно что это будет суммесли, но как поставить диапазон, который мало того всегда меняется, так еще и до предыдущей суммы будет

В примере 2 листа. до того как я вручную поставила суммы в столбце U напротив итого по абоненту, и после этого.

Вроде понятно объяснила..))
Изменено: Дарья - 27 Фев 2017 14:20:11
 
А откуда берутся данные в столбце А? Или Вам надо просто посчитать столбец U?
 
В столбце А данные от оператора. Да, нужно просто посчитать в столбце U, только с условиями описанными выше
 
Пробуйте
Код
Sub www()
Dim i As Long
Dim y As Long
    For i = 12 To Range("a1").SpecialCells(xlLastCell).Row
        If InStr(Cells(i, 1), "Дата") > 0 Then
            For y = i + 1 To Range("a1").SpecialCells(xlLastCell).Row
                If InStr(Cells(y, 1), "Итого по абоненту") > 0 Then
                    Cells(y, 21).Value = Application.Sum(Range(Cells(i + 1, 21), Cells(y - 1, 21)))
                    i = y
                    Exit For
                End If
            Next y
        End If
    Next i
End Sub
 
Здравствуйте. А может формула пригодится?
Изменено: gling - 2 Мар 2017 19:46:28
Страницы: 1
Читают тему (гостей: 1)
Наверх