Скопируйте 3 таблицы из доступа к существующему шаблону Excel

Question

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

    Dim xlApp As Excel.Application
    Dim DPath As String

    Set xlApp = CreateObject("Excel.Application")

    DPath = Application.CurrentProject.Path

    xlApp.Visible = True
    xlApp.DisplayAlerts = False
    xlApp.EnableEvents = False

    xlApp.Workbooks.Open DPath & "\Templates\Modelo de Supervivencia" & ".xltm", True, False
    Debug.Print xlApp.Version
    Set xlApp = Nothing

Извините за мой плохой английский sh и заранее спасибо!