Export Word Table into Outlook Email Body

[Loss1003]

How can I edit the following code, in-which copies a table to clipboard, and then the coiped table iinserted into an outlook email body.

Private Sub CommandButton4_Click()
With ActiveDocument
    .Tables(1).Range.Copy
    .Range(1, 1).Select
ActiveDocument.Tables(1).Cell(2, 1).Select
  
  
End With
End Sub

Currently using word 2010 and outlook professional plus 2010