Поиск  Пользователи  Правила 
Закрыть
Логин:
Пароль:
Забыли свой пароль?
Регистрация
Войти
 
Страницы: 1
RSS
Ошибка при воспроизведении записанного макрорекордером создания сводной таблицы
 
Добрый вечер, коллеги, нигде толкового ответа на проблему не нашел.
Создаю отдельный лист.
Записываю макрорекордером создание сводной таблицы на отдельном листе. При воспроизведении кода даже для того же файла выдает ошибку. Полдня вычитывал Интернет, узнал про сводные таблицы много интересного, но ни черта не понял, откуда ошибка. По синтаксису - все идеально, изменения в источнике данных ничего не дают, версия Офиса - 2013. Аналогичная ошибка же возникает, когда пытаюсь сначала задать pivot cashe, а потом добавить сводную таблицу. Обойти сумел, когда создавал макрорекордером не на отдельном, а на том же листе.
Очень нужно таких таблиц насоздавать на отдельных листах много,
Изменено: kohet - 30 Янв 2020 21:57:18
 
Здравствуйте.
Попробуйте так
Код
    ActiveWorkbook.PivotCaches.Create(SourceType:=xlDatabase, SourceData:= _
    "Sheet1!R1C1:R18C100").CreatePivotTable TableDestination _
    :=Sheets("RSD OVERDUE REPORT").Cells(1, 1), TableName:="PivotTable1"
 
или так:
TableDestination:="'RSD OVERDUE REPORT'!R1C1"
Программисты - это люди, решающие проблемы, о существовании которых Вы не подозревали, методами, которых Вы не понимаете!
 
gling,Вы гений, все сработало. Странно, что в Интернете не было толкового решения.
Если сформулировать суть проблемы, то необходимо было указать в Tabledestination путь к ячейке полностью через Sheets().Cells()
 
Цитата
kohet написал:
Если сформулировать суть проблемы
то название листа содержит пробелы, его нужно было взять в АПОСТРОФЫ
что-то программисты майкрософта завтыкали это сделать при записи макроса
поставьте 2 апострофа в том коде, что у вас есть и он тоже заработает.
у нас есть пользователь Апострофф,, это явно его тема
Программисты - это люди, решающие проблемы, о существовании которых Вы не подозревали, методами, которых Вы не понимаете!
Страницы: 1
Читают тему (гостей: 1)
Наверх