Подсчет количества строк в столбце

Дата: Среда, 14.02.2018, 22:11 | Сообщение № 1

Группа: Пользователи

Ранг: Новичок

Сообщений: 33

Репутация: 0 ±

Замечаний: 0% ±

Excel 2016

Добрый день! Пишу макрос для выгрузки из 2х отчетов. В одном из отчетов надо по каждому оператору посчитать количество зарегистрированных звонков. Я из общей массы отфильтровываю нужного человека, но посчитать сколько он зарегистрировал звонков не могу. Помогите пожалуйста написать макрос для этого. Файл оригинала прикладываю. Меня интересует столбец Заявитель, так как фильтр делаю по нему и статистику тоже.

Дата: Среда, 14.02.2018, 22:18 | Сообщение № 2

Группа: Пользователи

Ранг: Новичок

Сообщений: 33

Репутация: 0 ±

Замечаний: 0% ±

Excel 2016

Общее количество строк будет под 3.000. Пришлось удалить строки, дабы войти в размер допустимого размера на сайте. Если можно, то с комментариями, так как я только учусь

К сообщению приложен файл: 1147752.csv (77.1 Kb)

Nic70y

Дата: Среда, 14.02.2018, 22:33 | Сообщение № 3

Группа: Друзья

Ранг: Экселист

Сообщений: 9133

Репутация: 2416 ±

Замечаний: 0% ±

Excel 2010

а сводная? не?

К сообщению приложен файл: 1147752.xlsm (42.4 Kb)

ЮMoney 41001841029809

Дата: Среда, 14.02.2018, 22:50 | Сообщение № 4

Группа: Пользователи

Ранг: Новичок

Сообщений: 33

Репутация: 0 ±

Замечаний: 0% ±

Excel 2016

Nic70y, Я макросом смогу сделать сводную таблицу и получить эти данные? Мне именно макросом надо. У меня три файла. Два файла с разных мониторингов выгружается, а третий файл ведет общую статистику по принятым и зарегистрированным звонкам. Я смог из файла со звонками запросить и скопировать данные макросом и выгрузить в третий файл, а вот из зарегистрированных звонков не могу то же самое сделать макросом. Что бы не пришлось лишние действия делать и вводить их отдельно

Дата: Четверг, 15.02.2018, 08:44 | Сообщение № 5

Группа: Проверенные

Ранг: Обитатель

Сообщений: 332

Репутация: 49 ±

Замечаний: 0% ±

2003

Здравствуйте! Попробуйте начать с этого

К сообщению приложен файл: 0104544.xls (71.5 Kb)

Дата: Четверг, 15.02.2018, 10:18 | Сообщение № 6

Группа: Пользователи

Ранг: Новичок

Сообщений: 33

Репутация: 0 ±

Замечаний: 0% ±

Excel 2016

pechkin, Доброе утро! Вставляю фамилию, нажимаю кнопку и выдает ошибку, что не удается выполнить макрос, возможно макрос отсутсвует

Дата: Четверг, 15.02.2018, 10:20 | Сообщение № 7

Группа: Пользователи

Ранг: Новичок

Сообщений: 33

Репутация: 0 ±

Замечаний: 0% ±

Excel 2016

pechkin, А нет, заработало! Спасибо)

Дата: Четверг, 15.02.2018, 10:26 | Сообщение № 8

Группа: Пользователи

Ранг: Новичок

Сообщений: 33

Репутация: 0 ±

Замечаний: 0% ±

Excel 2016

pechkin, Вопрос у меня к Вам, а реализуемо ли такое, что бы не по каждому отдельно кнопку нажимать, а одной кнопкой сразу по всем? То есть, нажимаю кнопку, он выдает столбик по всем фамилиям в данном столбце и справа, допустим, выдает количество этих фамилий?
Не сочтите за наглость, с комментариями можете прошлый файлик сделать? Что бы я смог научиться так же

Дата: Четверг, 15.02.2018, 11:33 | Сообщение № 9

Группа: Проверенные

Ранг: Обитатель

Сообщений: 332

Репутация: 49 ±

Замечаний: 0% ±

2003

Сделел по выделению ячейки Пробуйте...

К сообщению приложен файл: 3454581.xls (77.5 Kb)

Дата: Четверг, 15.02.2018, 12:06 | Сообщение № 10

Группа: Пользователи

Ранг: Новичок

Сообщений: 33

Репутация: 0 ±

Замечаний: 0% ±

Excel 2016

pechkin, Спасибо болшое, я только имел ввиду немного другое. Список постоянно менять будет "Столбец F", по этому я не смогу наверное сделать запрос именно по определенным людям. Смотри, примерно так я хочу сделать. Количество человек будет больше. 3 ряда рабочих мест, в каждом ряду по 9 человек. Людей я сам добавлю потом.

К сообщению приложен файл: primer.xlsm (24.8 Kb)

Дата: Четверг, 15.02.2018, 13:16 | Сообщение № 11

Группа: Проверенные

Ранг: Обитатель

Сообщений: 332

Репутация: 49 ±

Замечаний: 0% ±

2003

Вот проверяйте

К сообщению приложен файл: 222333.xls (69.0 Kb)

Сообщение отредактировал pechkin - Пятница, 16.02.2018, 08:54

Дата: Четверг, 15.02.2018, 21:44 | Сообщение № 12

Группа: Пользователи

Ранг: Новичок

Сообщений: 33

Репутация: 0 ±

Замечаний: 0% ±

Excel 2016

pechkin, Подскажи пожалуйста, ты какую методичку читаешь по макросам?
Почему ты ставишь в условиях +1 ?
Я как понимаю, мне надо будет макросом заставить его написать все фамилии, в том расположении, в котором мне надо будет, и сразу справа он посчитает мне количество людей, верно я понимаю? Считает правильно)

Nic70y

Дата: Четверг, 15.02.2018, 21:49 | Сообщение № 13

Группа: Друзья

Ранг: Экселист

Сообщений: 9133

Репутация: 2416 ±

Замечаний: 0% ±

Excel 2010

Цитата SicVolo, 14.02.2018 в 22:50, в сообщении № 4 ()

Я макросом смогу сделать сводную таблицу и получить эти данные?

как я за Вас знать могу

рекордером по приколу записал
[vba]

Код

Sub u_847()
    Application.ScreenUpdating = 0

'   на всякий случай стираем старую сводную
    u_001 = Cells(Rows.Count, 10).End(xlUp).Row
    If [k1] <> "" Then Range("j1:k" & u_001).Clear
'
    u_002 = Cells(Rows.Count, 6).End(xlUp).Row

    ActiveWorkbook.PivotCaches.Create(SourceType:=xlDatabase, SourceData:= _
        Range("f1:g" & u_002), Version:=xlPivotTableVersion15).CreatePivotTable _
        TableDestination:=[j1], TableName:="u_003", _
        DefaultVersion:=xlPivotTableVersion15
    ActiveWorkbook.ShowPivotTableFieldList = True
    With ActiveSheet.PivotTables("u_003").PivotFields("Заявитель")
        .Orientation = xlRowField
        .Position = 1
    End With
    With ActiveSheet.PivotTables("u_003").PivotFields("Краткое описание")
        .Orientation = xlRowField
        .Position = 2
    End With
    ActiveSheet.PivotTables("u_003").AddDataField ActiveSheet.PivotTables _
        ("u_003").PivotFields("Краткое описание"), _
        "Количество по полю Краткое описание", xlCount

    Application.ScreenUpdating = -1
End Sub

[/vba]

К сообщению приложен файл: 3090157.xlsm (48.2 Kb)

ЮMoney 41001841029809

Дата: Пятница, 16.02.2018, 08:57 | Сообщение № 14

Группа: Проверенные

Ранг: Обитатель

Сообщений: 332

Репутация: 49 ±

Замечаний: 0% ±

2003

Здравствуйте! Посмотрите 11 сообщение я более подробно описал работу макроса (как сам понимаю) Вообще-то есть формула и все было бы гораздо проще (выделено зеленым) На форуме есть библиотека - читайте.