powered by simpleCommunicator - 2.0.38     © 2025 Programmizd 02
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Как правильно перенастроить сводную таблицу в Excel на другой путь
8 сообщений из 8, страница 1 из 1
Как правильно перенастроить сводную таблицу в Excel на другой путь
    #32223329
yuniki
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Как правильно перенастроить сводную таблицу в Excel на другой путь источника данных (MDB база).
В данном сеансе работы с книгой Источник данных собирается во временной MDB базе, которая после закрытия книги удаляется. Поэтому при очередном открытии книги после получения данных следует сводные таблицы перенастраивать на другой путь к новой временной MDB базе.
Следующий кусок работает но не всегда(не могу понять почему и как заставить его работать) :
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
With ActiveSheet.PivotTables(PvtName).PivotCache 
 StrSql = .CommandText
 .Connection = _
   "ODBC;DBQ="  + NewTmpDbPath +  ";DefaultDir="  + NameFile(NewTmpDbPath,  "P" ) & _ 
  ";Driver={Microsoft Access Driver (*.mdb)};DriverId=25 ;FIL=MS Access;MaxBufferSize= 2048 ;MaxScanRows= 8 ;PageTimeout= 5 " & _ 
  ";SafeTransactions=0 ;Threads= 3 ;UID=admin;UserCommitSync=Yes;"
 .CommandType = xlCmdSql 
 .CommandText = StrSqlEnd 
End With
ActiveSheet.PivotTables(PvtName).RefreshTable
...
Рейтинг: 0 / 0
Как правильно перенастроить сводную таблицу в Excel на другой путь
    #32224576
yuniki
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Люди Отзовитесь!!!

В ответ на ActiveSheet.PivotTables(PvtName).RefreshTable :
"Ошибка [Microsoft][Драйвер ODBC Microsoft Access] Не удается найти файл <имя старого MDB файла>" .

Как оказалось внутри SQL запроса сводной таблицы, которая была построена ручным путем через получение данных через ODBC, MsQuery стоит "Select ... FROM `E:\DOCUME~1\NIKIPH~1\LOCALS~1\Temp\USYPHEQF`.T T ", т.е. абсолютный путь .

и строка обновления запроса .CommandText = StrSql не работает - говорит "Application Define or ObjectDefine Error" .
...
Рейтинг: 0 / 0
Как правильно перенастроить сводную таблицу в Excel на другой путь
    #32224580
Fuzzy
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
А я обычно пользуюсь для этого свойством SourceData. Там и путь, и SQL, делаешь что хочешь.
...
Рейтинг: 0 / 0
Как правильно перенастроить сводную таблицу в Excel на другой путь
    #32224790
yuniki
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Не понятно для чего "для этого". Ведь это свойство ReadOnly?
Мне же, повторяю, нужно изменить путь .
...
Рейтинг: 0 / 0
Как правильно перенастроить сводную таблицу в Excel на другой путь
    #32224945
Fuzzy
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Отнюдь не ReadOnly, я его реально использовал, именно чтобы изменить путь
...
Рейтинг: 0 / 0
Как правильно перенастроить сводную таблицу в Excel на другой путь
    #32225079
yuniki
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Может Connection не такой как у меня ...
Но в Help написано REadOnly ...
...
Рейтинг: 0 / 0
Как правильно перенастроить сводную таблицу в Excel на другой путь
    #32225086
yuniki
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Да и странный он какой-то Array кусков ...
...
Рейтинг: 0 / 0
Как правильно перенастроить сводную таблицу в Excel на другой путь
    #32225204
yuniki
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
кое-что прояснилось :
и отмирающее свойство PivotChache.SQL и PivotChache.CommandText не принимают более 255 символов строки запроса
свойство же PivotChache.SourceData не понятно как следует менять - это variant массив строк. Если менять элементы этого массива то после переполучения свойства PivotChache.SourceData ничего не меняется.
...
Рейтинг: 0 / 0
8 сообщений из 8, страница 1 из 1
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Как правильно перенастроить сводную таблицу в Excel на другой путь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]