Как прописать переменную в VBA для сводной таблицы

Как прописать переменную в VBA для сводной таблицы, макрос фильтрации сводной таблицы

Пользователь

Сообщений: 13 Регистрация: 28.07.2017

30.03.2018 16:45:18

Здравствуйте! Не могу понять, как вместо конкретного значения подставить значение переменной в VBA в конкретном случае....

PT.PivotTables("Сводная таблица2").PivotFields("[Диапазон].[Country].[Country]").CurrentPageName = "[Диапазон].[Country].&[France]"

Значение "France", вместо него хотелось бы вывести значение переменной (например значение ячейки E12 как в моём примере). Подскажите пожалуйста.

Прикрепил файл с примером.

Прикрепленные файлы

Изменено: Zonda - 30.03.2018 16:45:45

Модератор

Сообщений: 16500 Регистрация: 10.01.2013

30.03.2018 17:10:50

Как-то так

Код
PT.PivotTables("Сводная таблица2").PivotFields("[Диапазон].[Country].[Country]").CurrentPageName = "[Диапазон].[Country].&[" & Range("E12").Value & "]"

Согласие есть продукт при полном непротивлении сторон

Zonda Пользователь Сообщений: 13 Регистрация: 28.07.2017	#3 02.04.2018 14:36:33 Sanja, спасибо большое!