Добрый день!
Имеется сводная таблица, в объект Recordset объекта PivotCache которой записываются данные, полученные из хранимой процедуры.
В таблице есть поле "Подразделение". Отчёт сводной таблицы из программы, путём нажатия кнопки, формирует оператор сразу по всем подразделениям. Далее программа выполняет по полю "Подразделение" команду "Отобразить страницы", и каждую страницу с отдельным подразделением сохраняет в свой файл.
Но при рассылке файлов специалисты каждого из подразделений могут посмотреть данные другого подразделения, а этого допустить нельзя.
Пробовала применить к объекту Recordset команду Delete, чтобы удалить из него записи с чужими подразделениями, но получила ошибку - Набор записей не поддерживает обновление. Как можно обойти проблему?

Спасибо. Это вариант, но пользователь после запрета сохранения данных вместе с таблицей не может изменять макет, а хотелось бы оставить эту возможность. Т.к. в конце концов можно после выбора подразделения скопировать данные на другой лист как значения, но тогда потеряем преимущества сводной...

Параметр с подразделением в процедуре есть, но по 1 подразделениб процедура отрабатывает за 30 сек, а по 20 сразу - за 60 сек. Поэтому запускать процедуру с параметром для этой цели нецелесообразно.
А что такое SSAS?
У нас Excel 2003

Из вариантов также - создать фильтр на Recordset (в эксперименте привело к тому, что все данные из таблицы исчезли без возможности восстановления), либо скопировать нужные данные в новый Recordset и его передать в PivotCache, но опасаюсь, что будет долго.
По расписанию ночью отчёт запускать нельзя, он нужен в оперативном режиме.

KL (XL)
Да, алгоритм процедуры сложный плюс объём обрабатываемых записей большой - обработке подвергаются по нескольку сотен тысяч записей из десятка таблиц, на выходе 15-30 тыс записей. Время обработки так соотносится для частного и целого потому, что в этом случае строятся разные планы исполнения запроса. Возможно пути оптимизации и существуют, но предполагаю что сократить время выполнения можно максимум на 50%.

В итоге реализовала следующий алгоритм:
1. На отдельном листе создаётся копия сводной таблицы, у которой поле Подразделение перемещено в область страниц.
2. По этому полю выполняется команда Отобразить страницы, после чего копия таблицы удаляется.
3. Рекордсет сводной таблицы копируется на лист в отдельный файл, файл закрывается (если рекордсет считывать с листа открытого файла, появляется сообщение о совместном доступе к файлу при работе через COM).
4. Каждую сводную таблицу копирую в отдельный файл.
5. По полю Подразделение файла текущей сводной таблицы делаю выборку с листа рекордсета, результат записываю в рекордсет сводной по подразделению.
6. Листы со сводными таблицами из основного файла удаляются.
7. Файл с рекордсетом удаляется.
KL (XL),
отдельное спасибо за идею построения рекордсета по набору данных на листе. Ранее приходилось строить сводные таблицы не по рекордсету, а указывая в источнике данных лист рабочей книги. При этом объём обрабатываемых сводной таблицей данных (и строк, и столбцов) меньше по сравнению с источником данных-рекордсетом, что в моём случае критично. Однако построение рекордсета по данным с листа и указание полученного рекордсета в качестве источника данных решает проблему.
Кстати, т.к. работаю через COM, построение и форматирование сводной таблицы при количестве записей более 2-3 тысяч сильно замедляктся, поэтому вместо построения сводных таблиц по каждому подразделению и был применён способ с отображением страниц и подменой рекордсета.
В целом процедура формирования исходной сводной таблицы занимает 30-50 сек и примерно столько же - весь процесс формирования экземпляров по подразделениям.