Copie d'une sélection de colonnes d'un tableau dans un word

Bonjour à tous, j'ai un nouveau problème, en fait actuellement j'ai une macro qui me permet de copier un tableau vers un word à l'endroit ou se situe le curseur dans le word, cependant mes colonnes copiées sont fixes (dans mon exemple les 1eres colonnes du tableau sont copiées) mais j'aimerais que l'utilisateur puisse choisir quelles colonnes il souhaite copier depuis l'excel vers le word.

Voici l'endroit ou les colonnes sont selectionnées dans ma macro :

Sheets("Vulne_Archi").Range("C5:E" & LastRow).Select
Selection.Copy

Puis elles sont copiées dans le word grâce à ça :

 Set WordApp = GetObject(, "Word.Application")

  If WordApp Is Nothing Then
    Set WordApp = New Word.Application
    Set WordDoc = WordApp.Documents(ThisWorkbook.Path & "\" & nom_fichier & ".docx")
  End If

  Set Plg = WordApp.Selection.Range

  WordApp.Selection.PasteExcelTable True, False, False

Si quelqu'un à des idées je suis preneur, merci :)

Rechercher des sujets similaires à "copie selection colonnes tableau word"