Tìm và thay thế dữ liệu từ excel vào header word

[Nam168]

Em chào các anh chị trên diễn đàn
Em nhờ anh chị giúp em vấn đề này ạ
Em có file Word cần lấy dữ liệu file tổng từ Excel. Em có tham khảo trên mạng và tự viết được code thay thế, nhưng còn phần header ở word thì em không biết viết code thế nào để khi chạy thì header word cũng lấy được dữ liệu từ excel
Em nhờ các anh chị giúp em với ạ
Em xin cảm ơn!

 

[batman1]

Thay

wdoc.Content.Find.Execute findtext:=.Cells(2, iColumn), replacewith:=.Cells(iRow + 2, iColumn), Replace:=wdReplaceAll

bằng

If iColumn = 2 Or iColumn = 4 Then
    wdoc.ActiveWindow.ActivePane.View.SeekView = wdSeekCurrentPageHeader
    wapp.Selection.End = 0
    wapp.Selection.Find.Execute findtext:=.Cells(2, iColumn), replacewith:=.Cells(iRow + 2, iColumn), Replace:=wdReplaceAll
End If
wdoc.Content.Find.Execute findtext:=.Cells(2, iColumn), replacewith:=.Cells(iRow + 2, iColumn), Replace:=wdReplaceAll

 

[Nam168]

Dạ cảm ơn anh @batman1 đã viết giúp em đoạn code này. Mai em sẽ thử ạ
Anh có thể cho em hỏi thêm một vấn đề nữa với ạ: là có cách nào sau khi tổng hợp xong mà mình muốn thay đổi 1 dữ liệu nào đó trong file excel này thì file word cũng sẽ tự động cập nhật mà không cần mở file word đó để chỉnh không ạ
Em cảm ơn anh !

 

[batman1]

Dạ cảm ơn anh @batman1 đã viết giúp em đoạn code này. Mai em sẽ thử ạ
Anh có thể cho em hỏi thêm một vấn đề nữa với ạ: là có cách nào sau khi tổng hợp xong mà mình muốn thay đổi 1 dữ liệu nào đó trong file excel này thì file word cũng sẽ tự động cập nhật mà không cần mở file word đó để chỉnh không ạ
Em cảm ơn anh !

Nếu thay đổi tập tin Excel thì các tập tin Word phải vứt vào sọt rác và phải chạy lại code.

Không có bất cứ dấu hiệu nào ở dưới đất và trên các vì sao, thậm chí trong tập tin Word, cho biết, tập tin Word đã được tạo bằng cách nào. Nó có thể được tạo bằng cách gõ văn bản bằng tay, bằng cách copy / paste từ đâu đó, do phần mềm nào đó tạo, hoặc code VBA bắn từ tập tin Excel sang. Có hàng triệu khả năng thì cập nhật bằng niềm tin à?

 

[Nam168]

Nếu thay đổi tập tin Excel thì các tập tin Word phải vứt vào sọt rác và phải chạy lại code.

Không có bất cứ dấu hiệu nào ở dưới đất và trên các vì sao, thậm chí trong tập tin Word, cho biết, tập tin Word đã được tạo bằng cách nào. Nó có thể được tạo bằng cách gõ văn bản bằng tay, bằng cách copy / paste từ đâu đó, do phần mềm nào đó tạo, hoặc code VBA bắn từ tập tin Excel sang. Có hàng triệu khả năng thì cập nhật bằng niềm tin à?

Cảm ơn anh đã giải thích ạ