Dùng VBA để mở file word bị mất mail merge

[Tuan_hcth]

Chào các anh, chị
Em dùng đoạn code này để mở file word từ excel nhưng lại bị mất chức năng Mail Merge:
Sub openword()
Set wordapp = CreateObject("word.Application")

Path = ThisWorkbook.Path & "\" & "123.docm"
wordapp.Documents.Open Path
wordapp.Visible = True
End Sub
Nhờ các anh, chị xem giúp em có cách nào mở file word bằng vba mà không bị mất đi chức năng Mail Merge với ạ. Em cảm ơn