Copied excel table to Word, but need Word opening in landscape

Im not sure if this is possible or not, so I wanted to reach out. I currently have a macro to copy my excel table and have this table opened up in Word...and it works great. The only other thing I am trying to do is have this table viewed in landscape when word opens up instead of changing it to landscape within Word every single time I use this macro. Is this at all possible?

If there's a better way to have these tables fully viewable in word without changing it to landscape in general or changing anything within Word itself, then please inform me. I will not be the one viewing these copied tables, which is why I am asking if theres a way to code this so these tables are fully viewable upon Word opening up.

Here's the working code I have that opens up the copied table in Word...if that matters:

Option Explicit
 
Sub PasteToWord()
     
    Dim AppWord         As Word.Application
    Set AppWord = CreateObject("Word.Application")
    AppWord.Visible = True
     '  Change the range to suit your needs. See the How to Use for this code
    Sheets("Sheet1").Range("A34:K91").Copy
    AppWord.Documents.Add
    AppWord.Selection.Paste
    Application.CutCopyMode = False
     
    Set AppWord = Nothing
     
End Sub

Thanks!