Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Экспорт из Access в Excel - несколько листов в одну книгу / 6 сообщений из 6, страница 1 из 1
03.08.2016, 14:17
    #39285364
-SWAN-
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Экспорт из Access в Excel - несколько листов в одну книгу
Добрый день, гуру Access'a!
Подскажите, пожалуйста, как экспортнуть в одну книгу EXCEL (в несколько листов) сразу несколько таблиц (запросов) из Access?
Делал пока так, но была только одна таблица и в один лист EXCEL
Код: sql
1.
DoCmd.OutputTo acOutputTable, "Таблица1", acFormatXLSX, "", False, "", 0


Спасибо заранее за любую помощь!
...
Рейтинг: 0 / 0
03.08.2016, 14:22
    #39285370
MrShin
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Экспорт из Access в Excel - несколько листов в одну книгу
-SWAN-,

Поищите по ключевому слову CopyFromRecordset
...
Рейтинг: 0 / 0
03.08.2016, 14:24
    #39285372
Экспорт из Access в Excel - несколько листов в одну книгу
Используйте DoCmd.TransferSpreadsheet, указывая одно и то же имя файла.
...
Рейтинг: 0 / 0
03.08.2016, 17:42
    #39285623
-SWAN-
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Экспорт из Access в Excel - несколько листов в одну книгу
Анатолий ( Киев )Используйте DoCmd.TransferSpreadsheet, указывая одно и то же имя файла.
Анатолий, спасибо большое за совет!
Всё получилось! Только хочется выбирать место куда сохраняется файл, есть ли такая возможность, не подскажете как сделать это?
...
Рейтинг: 0 / 0
04.08.2016, 09:20
    #39285876
Экспорт из Access в Excel - несколько листов в одну книгу
-SWAN-Только хочется выбирать место куда сохраняется файл Т.е. вам нужен диалог сохранения файла перед выполнением экспорта? Здесь есть несколько вариантов.
Например - встроенный объект FileDialog.
Но я предпочитаю диалог от WizHook (это тоже встроенный скрытый объект). Поищите на этом сайте - есть примеры.
...
Рейтинг: 0 / 0
04.08.2016, 12:05
    #39286109
-SWAN-
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Экспорт из Access в Excel - несколько листов в одну книгу
Анатолий ( Киев ), спасибо еще раз!
Сделал так (вроде работает):
Код: sql
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
With Application.FileDialog(msoFileDialogSaveAs)

    .Title = "Сохранить как"
    .InitialFileName = "Квартальный отчет " & Me.fi_DateBegin & "-" & Me.fi_DateEnd & ".xls"
    .Show
    
    If .SelectedItems.Count = 0 Then
        MsgBox "Вы отменили сохранение файла", vbCritical + _
                vbOKOnly, "Отмена"
    Else
        DoCmd.TransferSpreadsheet acExport, acSpreadsheetTypeExcel9, "ТСП_", .InitialFileName
        DoCmd.TransferSpreadsheet acExport, acSpreadsheetTypeExcel9, "ПВН_", .InitialFileName
    End If
End With
...
Рейтинг: 0 / 0
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Экспорт из Access в Excel - несколько листов в одну книгу / 6 сообщений из 6, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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