anvg, Отличное решение!!! большое спасибо!!!
Все_просто,  сначала не совсем поняла, о чем Вы говорите, но потом разобралась, тоже хороший вариант! спасибо!

Так дополнительно как раз и не активно в сводной таблице! А про второй способ не совсем понятно,можно поподробнее? А автофильтром это как,выбирать по очереди 200 артикулов?

Ребята, задача снова актуальна.

Может кто подскажет, как добавить данные в фильтр сводной таблицы автоматически, не руками?Именно в самой сводной, а не в исходной таблице?
Например есть список артикулов 200 шт, которые нужно отфильтровать (посмотреть) в сводной таблице, где всего артикулов около 500 000.

Нашла выход из ситуации:

ActiveWorkbook.SaveAs Filename:=("Прайс " & Format(Date, "YYYY-MM-DD") & ".xls"), FileFormat:=xlNormal

Работает,спасибо!

Только вот когда открываю этот сохраненный файл, то Эксель выдает сообщение:
"Действительный формат открываемого файла отличается от указываемого  его расширением имени файла.
Перед открытием данного файла убедитесь,что он не поврежден и получен из надежного источника" (((

не работает ((

Ребята, добрый день!
Хочу в конце своего макроса добавить строчку, которая будет сохранять файл с Названием "Прайс 2013-09-19"
в формате Эксель 2003-2007,дата всегда сегодняшняя, добавляю следующую строчку в макрос:

ActiveWorkbook.SaveAs Filename:=("Прайс & TEXT(TODAY(),""ГГГ-ММ-ДД"), ".xls"

Не хочет работать,что я делаю не так?

а можно на примере?

Как вариант!
Но!
Тогда фильтруется весь лист, а мне нужно,чтобы именно в фильтр сводной таблицы внести эти значения, но не вручную...
Можно было бы условным форматированием, но фильтр по цвету не работает в сводной таблице...

А у меня, к сожалению, нет возможности менять исходную таблицу, т.к. она тянется из OLAP куба сразу в сводную таблицу...

А каким образом Вы его добавили в исходную таблицу?

приложила)

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

А что значит *2-2?

Доброго времени суток!
Есть формула =СУММЕСЛИ(H:H;$A2;I:I).
Если я ее протягиваю вправо, то получаю формулу =СУММЕСЛИ(I:I;$A2;J:J).
А мне нужно, чтобы формула растягивалась не на 1 столбец,а на 2, то есть должно получаться вот так:
=СУММЕСЛИ(H:H;$A2;I:I), =СУММЕСЛИ(J:J;$A2;K:K), =СУММЕСЛИ(L:L;$A2;M:M) и т.д.
Можно ли это как-нибудь реализовать?