엑셀매크로(VBA)에서 워드문서연후 문자바꾸기

안녕하세요

엑셀vba에서 워드를 실행하고 find_replace명령을 처리하려 하는데 잘 안되네요

아래와같은 매크로를 엑셀에서 실행하고 있는데요

find명령을 이용하여 특정문자를 바꾸려고 하는데요('Name' -> '홍길동' 으로 바꾸기)

문법적으로는 문제가 없어보이는데 실제 바꾸기가 안되네요

왜 안되는지 이유를 모르겠네요

Sub 템플릿문서내용바꾸기()

    '워드어플리케이션 오픈

    Set wdApp = CreateObject("Word.Application")

    wdApp.Visible = True

    wdApp.WindowState = wdWindowStateNormal

    '탬플릿문서 오픈

    wdApp.Documents.Open fileName:="템플릿.docx"

    Set myRange = wdApp.ActiveDocument.Content

    myRange.Find.Execute FindText:="Name", Forward:=True, ReplaceWith:="홍길동", Replace:=wdReplaceAll

End Sub