как удалить кеш сводной и саму сводную? (макросом)

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

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

21.06.2010 15:32:08

Приветствую!
подскажите, как удалить/очистить кеш сводной таблицы или удалить саму таблицу кодом вба?
нужно для того, чтобы в одну таблицу при повторном запуске макроса можно было вставлять результаты разных запросов (внешних) с разными па-рами.

Serge Пользователь Сообщений: 11312 Регистрация: 01.01.1970	#2 21.06.2010 15:35:13 Sub Delete_PT() ActiveSheet.PivotTables("PT1").PivotSelect "", xlDataAndLabel, True Selection.ClearContents End Sub

Serge Пользователь Сообщений: 11312 Регистрация: 01.01.1970	#3 21.06.2010 15:40:28 Sub Change_Cash() On Error GoTo err_Handler ActiveCell.PivotTable.CacheIndex = 2 Exit Sub err_Handler: MsgBox "Кэш изменён" End Sub

elf Пользователь Сообщений: 3 Регистрация: 01.01.1970	#4 21.06.2010 15:44:15 Серж,спасибо, ваш вариант работает а очистить первый кеш, заменив рез-татом другого sql запроса не подскажите как?

Serge Пользователь Сообщений: 11312 Регистрация: 01.01.1970	#5 21.06.2010 15:48:36 {quote}{login=elf}{date=21.06.2010 03:44}{thema=}{post}Серж,спасибо, ваш вариант работает а очистить первый кеш, заменив рез-татом другого sql запроса не подскажите как?{/post}{/quote}Неа, это код для сводной из Эксель...

Читают тему