Hello,

I have the below code that will copy a table in Excel and then paste it into Word. However I cannot get it to autofitcontents to the page:

Code:
Sheet2.Range("F6:L" & (46 - Application.WorksheetFunction.CountBlank(Sheet2.Range("F6:F51"))) + 5).Copy
HelpDoc.Parent.ActiveDocument.Bookmarks("TEST").Range.PasteAndFormat (wdFormatOriginalFormatting)
I have tried something like:

Code:
Sheet2.Range("F6:L" & (46 - Application.WorksheetFunction.CountBlank(Sheet2.Range("F6:F51"))) + 5).Copy
HelpDoc.Parent.ActiveDocument.Bookmarks("TEST").Range.PasteAndFormat (wdFormatOriginalFormatting)
HelpDoc.Parent.ActiveDocument.Bookmarks("TEST").Range.Tables(1).AutoFitBehavior (wdAutoFitContent)
I still cannot get it to auto fit to the page.

Is anyone able to help please.

Thank you,

John