hungyen2010
Thành viên mới

- Tham gia
- 18/10/10
- Bài viết
- 10
- Được thích
- 0
Mình đang làm đưa dữ liệu từ excel sang file word, nhưng do mình có nhiều file word nên mình lưu file word theo từng thư mục tên file word được lấy từ một cell
Dim namefile As String
namefile = Sheet1.Range("K1").Value & ".doc"
Set template = .Documents.Open(ThisWorkbook.Path & "\" & namefile)
Nếu mình để file doc cùng với file macro thì sẽ mở được file word để đưa dữ liệu từ excel sang file word được, nhưngmình để file word trong từng thư mục thì không mở vì câu lệnh (thisworkbok chỉ mở được file cùng với file macro. Mong các bạn giúp mình cách sửa để mở được file word trong từng thư mục

Dim namefile As String
namefile = Sheet1.Range("K1").Value & ".doc"
Set template = .Documents.Open(ThisWorkbook.Path & "\" & namefile)
Nếu mình để file doc cùng với file macro thì sẽ mở được file word để đưa dữ liệu từ excel sang file word được, nhưng