Aidez moi svp exporter des colonnes d'une feuille excel vers word

BONJOUR,
je suis très très nul en VBA, si quelqu'un peut m'aider !!!!!

Donc mon probleme est le suivant:
je dois exporter d'une feuille excel que quelque colonne, par exemple ne prendre que la première colonne, la 3ème,la 6ème etc...
voici mon code :

Sub ToWords()
Dim docWord As Object
Dim appWord As Object
Set appWord = CreateObject("Word.Application")
appWord.Visible = True
Set docWord = appWord.Documents.Add
Range("A1:L17").Copy
appWord.Selection.Paste
docWord.Tables(1).autoFitBehavior 2
Application.CutCopyMode = False
End Sub

le soucis avec ce code c'est qu'il me prend toute les colonne de A1 à L17

voilà mon classeur excel en piece jointe