Привет!
Есть макрос 1, который фильтруется в сводной таблице "Продажи" по условию ячейки В2 на листе "расчет" (код ниже). Выбрал нужный город - подтянулась история продаж. Красота - не то слово.
Нюанс в том, что макрос фильтруется только по названию городу. Но по мимо прочего, у каждого города есть свой код склада. И помимо фильтрации по городу, нужна фильтрация в сводной таблице по нужному коду склада (лист матрица). Для примера город Москва, в сводной таблице история продаж по кодам склада № 7000, № 8001, № 8002, но фильтрация нужна не по всем складам (как это реализовано сейчас), а только по тем, которые указаны в отдельной таблице (лист матрица) - № 8001, № 8002.
Резюмирую: выбрал город, подтянулась история продаж по необходимым тебе кодам складов.
Есть макрос 1, который фильтруется в сводной таблице "Продажи" по условию ячейки В2 на листе "расчет" (код ниже). Выбрал нужный город - подтянулась история продаж. Красота - не то слово.
Нюанс в том, что макрос фильтруется только по названию городу. Но по мимо прочего, у каждого города есть свой код склада. И помимо фильтрации по городу, нужна фильтрация в сводной таблице по нужному коду склада (лист матрица). Для примера город Москва, в сводной таблице история продаж по кодам склада № 7000, № 8001, № 8002, но фильтрация нужна не по всем складам (как это реализовано сейчас), а только по тем, которые указаны в отдельной таблице (лист матрица) - № 8001, № 8002.
Резюмирую: выбрал город, подтянулась история продаж по необходимым тебе кодам складов.
Код |
---|
Sub Макрос1() Sheets("свод").PivotTables("Продажи").PivotFields("Город").ClearAllFilters Sheets("свод").PivotTables("Продажи").PivotFields("Город").CurrentPage = Sheets("расчет").Range("B2").Value End Sub |