С Новым годом! Форум программистов, компьютерный форум, киберфорум
Microsoft Access
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
 
Рейтинг 4.67/9: Рейтинг темы: голосов - 9, средняя оценка - 4.67
0 / 0 / 0
Регистрация: 10.05.2022
Сообщений: 10

Выгрузка отчета Access в Word

12.03.2023, 12:09. Показов 2306. Ответов 32
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Доброго времени суток уважаемые форумчане,

в шаблон Word выгружается только последняя запись отчета. На форуме есть похожая тема, но там всё свелось к экспорту данных из таблицы (запроса). Есть ли возможность экспортировать записи непосредственно из отчета? С VBA знаком поверхностно. Буду признателен за подсказку.
Вложения
Тип файла: rar Отчет.rar (53.5 Кб, 20 просмотров)
0
Лучшие ответы (1)
Programming
Эксперт
39485 / 9562 / 3019
Регистрация: 12.04.2006
Сообщений: 41,671
Блог
12.03.2023, 12:09
Ответы с готовыми решениями:

Выгрузка данный из формы Access в шаблон MS Word
Добрый день! Пожалуйста (!!!), помогите доработать базу. Мне необходимо делать выгрузку данных из формы ТТД в шаблон MS Word файла...

Экспорт отчета из Access в Word
Добрый вечер! Мне нужна помощь в создании отчета в Word. В форме "ОтчетФильтр" выбираем Применимость. Далее нажимаем кнопку Применить. В...

Выгрузка данных из полей формы Access 2007 в Word 2007 шаблон dot 1997-2003 гг
Прошу помощи с примером из protokol10. Он завязан на генерацию doc-документа со вставкой содержимого из полей БД в doc-файл при помощи...

32
Эксперт MS Access
 Аватар для Eugene-LS
12057 / 5842 / 1492
Регистрация: 05.10.2016
Сообщений: 16,429
12.03.2023, 12:50
Цитата Сообщение от Smayl Посмотреть сообщение
Есть ли возможность экспортировать записи непосредственно из отчета?
Вот и ув. shanemac51 сейчас ON LINE - а она признанный эксперт в этом вопросе.
Успехов!

Добавлено через 37 минут
Цитата Сообщение от Smayl Посмотреть сообщение
в шаблон Word выгружается только последняя запись отчета.
а что вы хотели если у вас:
Visual Basic
1
2
3
With objWord.ActiveDocument
         .Bookmarks.Item("Сотрудник").Range.Text = Reports![оСотрудники]![Поле0]
End With
Что вы хотите получить?
01. Несколько документов по разным сотрудникам?
02. Один документ со списком сотрудников (согласно шаблона)
0
0 / 0 / 0
Регистрация: 10.05.2022
Сообщений: 10
12.03.2023, 13:08  [ТС]
Здравствуйте,

мне необходимо вывести список в одном документе.
0
Эксперт MS Access
 Аватар для Eugene-LS
12057 / 5842 / 1492
Регистрация: 05.10.2016
Сообщений: 16,429
12.03.2023, 13:15
Цитата Сообщение от Smayl Посмотреть сообщение
мне необходимо вывести список в одном документе.
Ну так предъявите пожалуйста готовый результат с несколькими сотрудниками, дабы решающим было с чем сверять решения, коих будет великое множество, ну прям в течении следующих 5-6 часов ...
0
0 / 0 / 0
Регистрация: 10.05.2022
Сообщений: 10
12.03.2023, 13:21  [ТС]
Примерный образец итогового документа. Спасибо
Вложения
Тип файла: docx оСотрудники.docx (12.5 Кб, 21 просмотров)
0
Эксперт MS Access
 Аватар для Eugene-LS
12057 / 5842 / 1492
Регистрация: 05.10.2016
Сообщений: 16,429
12.03.2023, 13:36
Лучший ответ Сообщение было отмечено Smayl как решение

Решение

Цитата Сообщение от Smayl Посмотреть сообщение
Примерный образец итогового документа
Ну нечто такое :
Visual Basic
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
Private Sub Кнопка0_Click()
Dim objWord As Object
Dim strDOT As String, strList As String
Dim rst As DAO.Recordset
 
    DoCmd.OpenReport "оСотрудники", acViewPreview
    strDOT = Application.CurrentProject.Path & "" & "Шаблон.dotx"
 
    Set rst = CurrentDb.OpenRecordset("тСотрудники", dbOpenSnapshot) 
    
'Перебор всех записей в наборе
    With rst
        Do Until .EOF = True
            strList = strList & !ФИО & vbCrLf
            .MoveNext
        Loop
    End With
 
    rst.Close
    Set rst = Nothing
 
 
'загружаем Word и шаблон соглашения
    Set objWord = CreateObject("Word.Application")
    objWord.Visible = True
    objWord.Documents.Add strDOT
    objWord.ActiveDocument.Bookmarks.Item("Сотрудник").Range.Text = strList
  
End Sub
1
0 / 0 / 0
Регистрация: 10.05.2022
Сообщений: 10
12.03.2023, 13:49  [ТС]
Уважаемый Eugene-LS, спасибо. Работает
0
Модератор
Эксперт MS Access
 Аватар для shanemac51
12231 / 5078 / 814
Регистрация: 07.08.2010
Сообщений: 14,931
Записей в блоге: 4
12.03.2023, 14:05
Цитата Сообщение от Smayl Посмотреть сообщение
Примерный образец итогового документа
сложно считать это примером, который должен получить данные с отчета

любой приказ - это
- шапка
- номер
- дата
- тема
- подписи и подписанты с должностями
- список .....и не всегда

все это должно быть в таблицах, вводиться в формах
отчет (аксесс или ворд) - это только визуализация для печати, для подшивки в папкм с документами

Добавлено через 8 минут
Цитата Сообщение от Eugene-LS Посмотреть сообщение
strList = strList & !ФИО & vbCrLf
очень редко в приказ требуется только фио
как минимум -это
- порядковый номер
- часто должность
- какие-то даты
- часто строка для подписей об ознакомлении

а это уже таблица, в которой фио или должность займут несколько строк
поэтому я и попросила выложить реалистичный приказ
0
0 / 0 / 0
Регистрация: 10.05.2022
Сообщений: 10
12.03.2023, 14:33  [ТС]
Здравствуйте уважаемая shanemac51, Вы точно подметили суть проблемы. Создание офисных документов требует определенных подходов, которые проще и лучше реализуются в отчетах. И, как я понял, экспорт данных отчета в Word возможен только для одной записи. Для набора записей необходимо обращаться к таблице (запросу), а создание собственно документа осуществлять програмным способом. В целом, в рамках поставленного вопроса, уважаемый Eugene-LS решение дал верное.
С уважением )
0
598 / 404 / 51
Регистрация: 06.03.2022
Сообщений: 2,129
12.03.2023, 16:45
Прочитал весь топик (Ув.capi-здравствуйте).
Конкретика в сообщении и вложении=0,поэтому вопрос(на который,уверен, ответа не будет):
Чем отличаются отчет созданный в ACCESS от импортированного в шаблон (если в нем нет недоступных ACCESS возможностей) Word ?
0
0 / 0 / 0
Регистрация: 10.05.2022
Сообщений: 10
12.03.2023, 16:58  [ТС]
Здравствуйте,

не обессудьте, но Ваш вопрос мне не совсем понятен. Меня интересовал экспорт данных из отчета Access в документ Word.

Добавлено через 1 минуту
Или Вы имели в виду штатные средства Access для этих целей?
0
Модератор
Эксперт MS Access
6231 / 2909 / 707
Регистрация: 12.06.2016
Сообщений: 7,839
12.03.2023, 17:01
Цитата Сообщение от SDKU Посмотреть сообщение
Чем отличаются отчет созданный в ACCESS от импортированного в шаблон (если в нем нет недоступных ACCESS возможностей) Word ?
Можно, я отвечу? )))

Тем, что вордовский документ можно отправить по e-mail, например.
А отчет Access (в чистом виде) - нет.
0
Эксперт MS Access
 Аватар для Eugene-LS
12057 / 5842 / 1492
Регистрация: 05.10.2016
Сообщений: 16,429
12.03.2023, 17:08
Цитата Сообщение от Capi Посмотреть сообщение
А отчет Access (в чистом виде) - нет.
Можно легко в PDF - и на почту ....
0
Модератор
Эксперт MS Access
6231 / 2909 / 707
Регистрация: 12.06.2016
Сообщений: 7,839
12.03.2023, 17:18
Цитата Сообщение от Eugene-LS Посмотреть сообщение
Можно легко в PDF
Я же не зря уточняю:
Цитата Сообщение от Capi Посмотреть сообщение
в чистом виде
0
0 / 0 / 0
Регистрация: 10.05.2022
Сообщений: 10
12.03.2023, 17:18  [ТС]
Уважаемые форумчане, спасибо за живое участие в обсуждении

Штатные средства импорта действительно решают эту проблему, с одним только но: форматирование. Обилие знаков табуляции и определение каждой строки как абзац создают сложности с финальным оформлением документов, особенно когда записей больше чем 100.
Если в процесс работы мастера импорта можно вмешаться, то это тоже был бы вариант. Но это, вероятно, доступно только посвященным
0
Эксперт MS Access
 Аватар для Eugene-LS
12057 / 5842 / 1492
Регистрация: 05.10.2016
Сообщений: 16,429
12.03.2023, 17:29
Цитата Сообщение от Smayl Посмотреть сообщение
Но это, вероятно, доступно только посвященным
Покажите "откуда" и "куда" - посмотрим что можно сделать ... И да! Там есть нюансы.
....
БД это одно, а книжка Excel - это другое, там пользователи такого могут понаписать ... - диву иногда даёшься!
Часто приходится через промежуточную таблицу с последующим исправлением значений (регулярных ошибок) импортировать.

А как вам импорт сотни листов из папки с отчётом - что пришло а что нет?
Бывает и такое ...
0
598 / 404 / 51
Регистрация: 06.03.2022
Сообщений: 2,129
12.03.2023, 17:54
Внешние данные>экспорт дополнительно>Word. Не?
Или расширение обязательно должно быть *.doc\docx, а *.rtf не годится
Сapi, что именно Вы подразумеваете под "в чистом виде"

Не по теме:

Ведь все экспортируется как на экране, а интервалы и многое другое можно задать в конструкторе изменяя высоту\ширину\положение полей\разделов, используя конкатенацию,разный шрифт\насыщенность в разных полях и т.п

0
0 / 0 / 0
Регистрация: 10.05.2022
Сообщений: 10
12.03.2023, 18:00  [ТС]
Уважаемый Eugene-LS, Ваша подсказка меня очень выручила. Стало понятно, почему я вижу одну запись, а не весь набор (я подозревал, что у меня что-то не так). Однако , все-таки, возможно ли, чтобы в шаблон Word вставлялись данные из поля отчета, а не из поля таблицы (запроса). Ведь в поле отчета к данным из источника может быть добавлено то, чего нет в исходной таблице (в любезно предоставленном Вами примере отчет же не нужен).
Прошу прощения за обилие букв )
0
Модератор
Эксперт MS Access
6231 / 2909 / 707
Регистрация: 12.06.2016
Сообщений: 7,839
12.03.2023, 18:08
Цитата Сообщение от SDKU Посмотреть сообщение
Сapi, что именно Вы подразумеваете под "в чистом виде"
Отчет, сформированный в Access средствами Access.
0
Эксперт MS Access
 Аватар для Eugene-LS
12057 / 5842 / 1492
Регистрация: 05.10.2016
Сообщений: 16,429
12.03.2023, 18:12
Цитата Сообщение от Smayl Посмотреть сообщение
Ведь в поле отчета к данным из источника может быть добавлено то, чего нет в исходной таблице
Форматируем текст как нужно - и вставляем ...

В документе можно ещё форматировать текст, оформлять его таблицей, раскрашивать, добавлять рисунки и графики - это уже нужно работать по объектной модели MS Word, коя мимо данного раздела форума.
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
inter-admin
Эксперт
29715 / 6470 / 2152
Регистрация: 06.03.2009
Сообщений: 28,500
Блог
12.03.2023, 18:12
Помогаю со студенческими работами здесь

Выгрузка отчета в MS Word
Собственно проблема в том, что не выгружается в MS Word отчет по календарным датам и т.п. Офис 2007, Lotus 6.5. Я так подозреваю, что...

Создание отчета и его выгрузка в Excel, Word
Здравствуйте! Есть база данных в access и она соединена с делфи, мне нужно в делфи сделать отчеты, и чтоб они выгружались в excel, word и...

Выгрузка данных из БД Access в Word средствами Delphi
Здравствуйте, ребята. У меня возникла следующая проблема. Есть MS Access. Средствами Delphi нужно выгрузить данные из одной из таблиц в...

Экспорт отчета из Access в Word
Подскажите, пожалуйста, как экспортировать отчет из Access в Word, не задавая имени файла, то есть, чтобы он хранился в ОП, а когда...

Экспорт отчета из Access в Word
Подскажите, пожалуйста, как экспортировать отчет из Access в Word, не задавая имени файла, то есть, чтобы он хранился в ОП, а когда...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
20
Ответ Создать тему
Новые блоги и статьи
Модель микоризы: классовый агентный подход
anaschu 02.01.2026
Раньше это было два гриба и бактерия. Теперь три гриба, растение. И на уровне агентов добавится между грибами или бактериями взаимодействий. До того я пробовал подход через многомерные массивы,. . .
Учёным и волонтёрам проекта «Einstein@home» удалось обнаружить четыре гамма-лучевых пульсара в джете Млечного Пути
Programma_Boinc 01.01.2026
Учёным и волонтёрам проекта «Einstein@home» удалось обнаружить четыре гамма-лучевых пульсара в джете Млечного Пути Сочетание глобально распределённой вычислительной мощности и инновационных. . .
Советы по крайней бережливости. Внимание, это ОЧЕНЬ длинный пост.
Programma_Boinc 28.12.2025
Советы по крайней бережливости. Внимание, это ОЧЕНЬ длинный пост. Налог на собак: https:/ / **********/ gallery/ V06K53e Финансовый отчет в Excel: https:/ / **********/ gallery/ bKBkQFf Пост отсюда. . .
Кто-нибудь знает, где можно бесплатно получить настольный компьютер или ноутбук? США.
Programma_Boinc 26.12.2025
Нашел на реддите интересную статью под названием Anyone know where to get a free Desktop or Laptop? Ниже её машинный перевод. После долгих разбирательств я наконец-то вернула себе. . .
Thinkpad X220 Tablet — это лучший бюджетный ноутбук для учёбы, точка.
Programma_Boinc 23.12.2025
Рецензия / Мнение/ Перевод Нашел на реддите интересную статью под названием The Thinkpad X220 Tablet is the best budget school laptop period . Ниже её машинный перевод. Thinkpad X220 Tablet —. . .
PhpStorm 2025.3: WSL Terminal всегда стартует в ~
and_y87 14.12.2025
PhpStorm 2025. 3: WSL Terminal всегда стартует в ~ (home), игнорируя директорию проекта Симптом: После обновления до PhpStorm 2025. 3 встроенный терминал WSL открывается в домашней директории. . .
Как объединить две одинаковые БД Access с разными данными
VikBal 11.12.2025
Помогите пожалуйста !! Как объединить 2 одинаковые БД Access с разными данными.
Новый ноутбук
volvo 07.12.2025
Всем привет. По скидке в "черную пятницу" взял себе новый ноутбук Lenovo ThinkBook 16 G7 на Амазоне: Ryzen 5 7533HS 64 Gb DDR5 1Tb NVMe 16" Full HD Display Win11 Pro
Музыка, написанная Искусственным Интеллектом
volvo 04.12.2025
Всем привет. Некоторое время назад меня заинтересовало, что уже умеет ИИ в плане написания музыки для песен, и, собственно, исполнения этих самых песен. Стихов у нас много, уже вышли 4 книги, еще 3. . .
От async/await к виртуальным потокам в Python
IndentationError 23.11.2025
Армин Ронахер поставил под сомнение async/ await. Создатель Flask заявляет: цветные функции - провал, виртуальные потоки - решение. Не threading-динозавры, а новое поколение лёгких потоков. Откат?. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru