VBA : Copying Excel into a word table

  • i have a two column word table template and would like to paste excel data into column 2.
    So far i have
    Sub Paste_word()
    Range("F8:M8").Select
    Selection.Copy
    Set wrd = GetObject(, "Word.Application"):


    With wrd:
    With .Selection


    Set MyRange = .Goto(wdGoToField, wdGoToPrevious)
    .MoveDown Count:=6
    .MoveRight Unit:=wdCell
    .PasteExcelTable False, False, False
    End With
    End With


    End Sub



    When i get to the .MoveRight Unit:=wdCell line i get a 4120 Bad Parameter error.


    I can run this code in Word correctly but not in excel.


    Could you please advise how i can get excel to change into the second column of my word table?

Participate now!

Don’t have an account yet? Register yourself now and be a part of our community!