-Поиск по дневнику

Поиск сообщений в rss_sql_ru_access_programming

 -Подписка по e-mail

 

 -Постоянные читатели

 -Статистика

Статистика LiveInternet.ru: показано количество хитов и посетителей
Создан: 16.03.2006
Записей:
Комментариев:
Написано: 4


Программное открытие файла mdb в Excel 2010 без выбора источника данных

Четверг, 06 Февраля 2014 г. 10:39 + в цитатник
Здравствуйте.

Я вообще "программист" 1С. Возникла необходимость создания и открытия файла mdb в Excel.
Код (прошу прощение за русскоязычную часть, но я думаю там все понятно):
автор
РабочаяКнига = СоздатьОбъект("Excel.Application");
РабочаяКнига.SheetsInNewWorkbook = 1;
РабочаяКнига.Caption = "Сводная таблица";
NewBook = РабочаяКнига.Workbooks;
List = NewBook.Add;

СтрокаПодключения = "ODBC;DSN=База данных MS Access;DBQ=" + КаталогПользователя() + "sr.mdb;DefaultDir=" + КаталогПользователя();

SQL = "SELECT * FROM [PIVOT]";
Назначение = РабочаяКнига.ActiveSheet.Range("A1");

Если ТЗТаблицы.КоличествоСтрок()>65530 Тогда
Предупреждение("Размер сводной таблицы превышает 65530 строк.",30);
ФС.УдалитьФайл(КаталогПользователя()+"sr.mdb");
Форма.Закрыть();
Возврат;
Иначе
QueryTables = РабочаяКнига.ActiveSheet.QueryTables.Add(СтрокаПодключения,Назначение,SQL);
QueryTables.Refresh(0);
СводнаяТаблица = РабочаяКнига.ActiveSheet.PivotTableWizard;
СводнаяТаблица.SmallGrid = 0;
СводнаяТаблица.Format(1);
КонецЕсли;

РабочаяКнига.Visible = 1;


Суть в чем. Создается файл mdb, а затем открывается в Excel и там создается сводная таблица.
C Excel 2003 никаких проблем нет и все работает замечательно.
А в 2010 просит выбрать источник данных.
Можно этот как то обойти, чтобы Excel сразу открывался?
Мне кажется это как то связано со строкой подключения, а в чем проблема разобраться никак не могу.

http://www.sql.ru/forum/1075758/programmnoe-otkrytie-fayla-mdb-v-excel-2010-bez-vybora-istochnika-dannyh


 

Добавить комментарий:
Текст комментария: смайлики

Проверка орфографии: (найти ошибки)

Прикрепить картинку:

 Переводить URL в ссылку
 Подписаться на комментарии
 Подписать картинку