Я хочу создать шаблон в Word, чтобы затем использовать Access для слияния данных. Данные Access имеют различные уровни группировки. Внутри каждой группировки есть подзапросы, которые также могут иметь группировку. Поскольку существует группировка, некоторые страницы необходимо будет повторять.

Пример: у меня есть запрос, который печатает информацию о классе. В каждом классе тоже много учеников. Итак, я хотел бы иметь шаблон DOTM, который группирует каждого студента по классу. Затем печатается информация о первом классе, затем об учениках, затем о следующем классе, затем об учениках и т. Д.

Таблицы / запросы Access и т. Д. Не являются проблемой. Это создание шаблона, затем объединение его, с которым у меня возникают проблемы. Прямо сейчас у меня есть простой шаблон (файл Dotm). В файле есть несколько шаблонных вещей и несколько закладок. Затем я использую этот код для взаимодействия с файлом dotm:

Dim objWord As Word.Application
Dim PauseTime, Start, Timer As Integer
Dim wrkCurrent As DAO.Workspace

Set objWord = CreateObject("Word.Application")
objWord.Visible = False 'True is visible

Dim sql As String
sql = "SELECT * FROM tbl_School"  'ex query that produces more that one record
Dim dbs As DAO.Database
Dim rst As DAO.Recordset
Set wrkCurrent = DBEngine.Workspaces(0)
Set dbs = CurrentDb
Set rst = dbs.OpenRecordset(sql)

objWord.Documents.Add ("C:\test\Test.dotm")
'this template has one page, with one bookmark, School_Name.  What I want
' to happen is that, for every record, create a new page, with this 
'bookmark filled in.
If (Not rst.EOF) Then
    With rst
        Do Until .EOF
            objWord.ActiveDocument.Bookmarks("School_Name").Select
            objWord.Selection.Text = rst!school_name
            .MoveNext
        Loop
    End With
End If

objWord.ActiveDocument.SaveAs ("C:\test\MyNewDocument.docx")
objWord.PrintOut
objWord.Quit
Set objWord = Nothing

Проблема в том, что это печатает только сначала, а затем ошибки. Как бы я сделал группировку? К вашему сведению, я знаю, что могу делать это в отчетах, но я должен разрешить экспорт отчета в Word, сохраняя изображения, графику и т. Д., Которые при экспорте теряются.