Como pesquisar o conteúdo de um arquivo Excel (na coluna A) em um arquivo Word e adicionar um comentário nessa palavra com o conteúdo da coluna B?

Question

Primeiramente gostaria de dizer que tenho conhecimentos básicos de VBA.

Atualmente, estou tentando criar uma macro no Word que gostaria de vincular a um arquivo Excel aberto e procurar uma palavra da coluna A no arquivo Word aberto. Aí gostaria que a macro colocasse um comentário naquela palavra no Word e inserisse o conteúdo da coluna B do arquivo Excel.

Tentei combinar diferentes linhas de código de fontes diferentes, mas não consigo fazer funcionar.

Tem alguém aqui que sabe fazer isso?

Muito obrigado antecipadamente!

Tenho o seguinte código para adicionar o comentário (mas não está vinculado ao arquivo excel);

Selection.Find.ClearFormatting

Dim range As range
Set range = ActiveDocument.Content

Do While range.Find.Execute("XXXXXX") = True
ActiveDocument.Comments.Add range, "YYYYYY"
Loop

e o seguinte código que encontra o conteúdo da coluna A e atualmente o substitui pelo conteúdo da coluna B.

Dim ws As Activesheet, msWord As Object, itm As range

Set ws = Activesheet
Set msWord = ActiveDocument.Content

With msWord ' cant figure out how to change this so it uses the currently open Word file.
    .Visible = True
    .Documents.Open "F:\Test folder\TestFolder\Test.docx"
    .Activate

    With .ActiveDocument.Content.Find
        .ClearFormatting
        .Replacement.ClearFormatting

        For Each itm In ws.UsedRange.Columns("A").Cells

            .Text = itm.Value2                          'Find all strings in col A

            .Replacement.Text = itm.Offset(, 1).Value2  'Replacements from col B

            .MatchCase = False
            .MatchWholeWord = False

            .Execute Replace:=2     'I guess this should be replaced with the code that places the text YYYYYY as a comment on the text XXXXXX?
        Next
    End With
    .Quit SaveChanges:=True
End With