XL 2013 exporter un Excel vers un word (dans 1ère page vide)

[oz2007]

Hello,

Voici mon problème. J'ai un tableau excel qui s'incrémente à l'aide d'un toupie.
Donc la manip que je souhaite faire en vba est la suivante:
- copie des cellules A1 à T43
- dans le doc word déjà ouvert, ma macro doit ajouter une page à la suite des autres pages (qui contiennent des images)
- coller en bitmap dans la 1ère page word vide

j'ai commencé le code suivant mais je n'arrive pas à trouver comment ajouter une page à mon word et copier ensuite mon image au bon endroit

Sub Excel_Word()
  
Dim oWdApp As Word.Application
Dim oWdDoc As Word.Document
'Lancer une instance Word
Set oWdApp = CreateObject("Word.Application")
  
'Ouvrir un nouveau document
Set oWdDoc = oWdApp.Documents.Add
'Rendre Word visible
oWdApp.Visible = True

  If oWdApp.Selection.PageSetup.Orientation = wdOrientPortrait Then
    oWdApp.Selection.PageSetup.Orientation = wdOrientLandscape
  Else
    oWdApp.Selection.PageSetup.Orientation = wdOrientPortrait
  End If
  
'Détermine la plage contenant des valeurs
ThisWorkbook.Worksheets("Export Manuel").Range("A1:T43").Copy

  
'Coller la plage dans Word
oWdApp.Selection.Paste
oWdApp.ActiveWindow.ActivePane.VerticalPercentScrolled = 0
oWdApp.Selection.Tables(1).AutoFitBehavior AutoFitWindow

Application.CutCopyMode = False
  
End Sub

merci d'avance à tous