Trộn dữ liệu từ Excel sang Word mở rộng (phiên bản ongke0711)

Liên hệ QC

ongke0711

Thành viên gắn bó
Tham gia
7/9/06
Bài viết
1,969
Được thích
2,561
Giới tính
Nam
(Xin phép được tách bài từ bài post của bác Maika8008 (Link) để tránh lẫn lộn khi trao đổi và do cũng tài lanh xen vào, gây loãng bài của bác ấy).


Trộn dữ liệu từ Excel sang Word
-------------------------------------------------------------------------------------------

Lấy cảm hứng từ ý tưởng và file của bác Maika8008, tôi cũng thiết kế một phiên bản khác cho việc Trộn dữ liệu từ Excel sang Word.
Phiên bản này tổng hợp các nhu cầu thực tế của người dùng đã trao đổi trong chủ để này, có thể chưa đầy đủ nhưng cũng đáp ứng cơ bản cho công việc.

* Các chức năng:
- Tùy chọn trộn dữ liệu: Một (hoặc nhiều) đối tượng cho một (hoặc nhiều) văn bản.
- Tự động tạo tiêu đề cột riêng, không ảnh hưởng đến thiết kế bảng.
- Không cần cố định vị trí (dòng, cột ) của dữ liệu cần trộn vì dùng tham chiếu qua Table name.
- Chỉ lấy những dòng dữ liệu sau khi dùng Filter trong bảng dữ liệu.
- Khắc phục lỗi khi trộn đoạn văn bản nhiều hơn 255 ký tự.
- Trộn có kèm luôn file hình ảnh (.jpg, .png, .bmp).
- Trộn các Symbols (font Wingdings, Marlett, Webdings)
- Xuất file dạng .Docx, .PDF


>> Cập nhật ngày 11/10/2023:
- Trộn bảng biểu Excel vào Word Table, giữ nguyên định dạng thiết kế trong Excel.

Thiết kế cũng chưa bẫy lỗi gì nhiều, chắc chắn sẽ phát sinh lỗi khi thao tác, các bạn chạy kiểm tra thử nhé.
Tôi cũng đã thử dùng kết hợp tính năng Mail Merger có sẵn trong Word + VBA cho các tùy chọn nhưng tốc độ thực thi cũng không bằng một góc so với việc dùng thẳng Mail Merge (*) trong Word vì dù gì thì nó cũng đã qua code VBA để gọi tính năng Merge.

(*) Dùng Mail Merge trong Word rất nhanh nhưng nó chỉ đáp ứng tùy chọn cơ bản, đó là lý do có nhiều công cụ viết mở rộng thêm cho tính năng này.

Mã:
wdocSource.MailMerge.OpenDataSource...






3qgQKVn.png






Hướng dẫn sử dụng trong video.


* Đã cập nhật bẫy lỗi và chuyển sang kết nối muộn (Late binding) với Word để tránh lỗi giữa các phiên bản Office.

Link file (full code): https://www.mediafire.com/file/8fc086iogo32cie/MergeDataExcel2Word.zip/file
 
Lần chỉnh sửa cuối:
Công thức Excel, tôi tệ lắm, hơn nữa tôi cũng không hiểu ý nghĩa các cột 1a - 12b là cái gì, làm sao tính ra được, tôi đọc công thức thì không hiểu gì cả nhé bạn. Bạn giải thích cho rõ vì không phải ai cũng hiểu được công việc, cách tính toán của bạn qua cái bảng tính này. Nhờ các bạn khác hỗ trợ giùm thôi. Tốt nhất là lập cái chủ đề khác liên quan đến xử lý công thức, tính toán cho file Excel của bạn.
Dạ E cảm ơn A nhiều ạ
Bài đã được tự động gộp:

Dạ E cảm ơn A nhiều ạ
Vậy VBA có code như thế nào để các cột 1a đến 12b vòng lặp trên điều kiện số tháng nhất định ko ạ? Vì khi trộn vb thì bạn hưởng 3 tháng nhưng mặc định khi trộn vẫn chạy hết từ 1a đến 12b. Trong khi chỉ có chạy đến 3b thôi ạ
 
Upvote 0
(Xin phép được tách bài từ bài post của bác Maika8008 (Link) để tránh lẫn lộn khi trao đổi và do cũng tài lanh xen vào, gây loãng bài của bác ấy).


Trộn dữ liệu từ Excel sang Word
-------------------------------------------------------------------------------------------

Lấy cảm hứng từ ý tưởng và file của bác Maika8008, tôi cũng thiết kế một phiên bản khác cho việc Trộn dữ liệu từ Excel sang Word.
Phiên bản này tổng hợp các nhu cầu thực tế của người dùng đã trao đổi trong chủ để này, có thể chưa đầy đủ nhưng cũng đáp ứng cơ bản cho công việc.

* Các chức năng:
- Tùy chọn trộn dữ liệu: Một (hoặc nhiều) đối tượng cho một (hoặc nhiều) văn bản.
- Tự động tạo tiêu đề cột riêng, không ảnh hưởng đến thiết kế bảng.
- Không cần cố định vị trí (dòng, cột ) của dữ liệu cần trộn vì dùng tham chiếu qua Table name.
- Chỉ lấy những dòng dữ liệu sau khi dùng Filter trong bảng dữ liệu.
- Khắc phục lỗi khi trộn đoạn văn bản nhiều hơn 255 ký tự.
- Trộn có kèm luôn file hình ảnh (.jpg, .png, .bmp).
- Xuất file dạng .Docx, .PDF


Thiết kế cũng chưa bẫy lỗi gì nhiều, chắc chắn sẽ phát sinh lỗi khi thao tác, các bạn chạy kiểm tra thử nhé.
Tôi cũng đã thử dùng kết hợp tính năng Mail Merger có sẵn trong Word + VBA cho các tùy chọn nhưng tốc độ thực thi cũng không bằng một góc so với việc dùng thẳng Mail Merge (*) trong Word vì dù gì thì nó cũng đã qua code VBA để gọi tính năng Merge.

(*) Dùng Mail Merge trong Word rất nhanh nhưng nó chỉ đáp ứng tùy chọn cơ bản, đó là lý do có nhiều công cụ viết mở rộng thêm cho tính năng này.

Mã:
wdocSource.MailMerge.OpenDataSource...

Y9SHro3.png


e7fmRBR.png


Hướng dẫn sử dụng trong video.


* Đã cập nhật bẫy lỗi và chuyển sang kết nối muộn (Late binding) với Word để tránh lỗi giữa các phiên bản Office.

Link file (full code): https://www.mediafire.com/file/8fc086iogo32cie/MergeDataExcel2Word.zip/file
Chào bạn. Trước hết rất cám ơn bạn vì đã chia sẻ. Cho mình hỏi mình chỉ muốn trộn các file có tên trong cột "Nội dung" theo từng hàng. Tức là mỗi file trộn với hàng tương ứng với cột nội dung. Ở đây mình lấy ví dụ có 2 file Tờ trình xin phê duyệt chủ trương và Báo cáo đề xuất chủ trương. Mình chỉ muốn trộn ra 2 file tương ứng đó
 

File đính kèm

  • 1. Tờ trình xin phê duyệt chủ trương.doc
    50 KB · Đọc: 9
  • MailMerge_vba.xlsm
    78.2 KB · Đọc: 16
  • 2. Báo cáo đề xuất chủ trương.doc
    141 KB · Đọc: 10
Upvote 0
cảm ơn bác rất nhiều, ứng dụng rất hữu ích.

Tuy nhiên đối với trường hợp em đang ứng dụng thì số cột tiêu đề cần điền là khá nhiều (35 cột). Vậy có cách nào điều chỉnh theo dạng tiêu đề đặt theo dòng không ạ. Nếu được bác giúp thêm em vụ này ạ
Kiểu như này ạ
Tiêu đềNội dung cần điền
Người lập biên bảnTrần Thị Lý
Số biên bản01/BB-VPHC
Ngày tháng thời gian lập biên bản10h00 ngày 01/01/2022
Địa điểm lập biên bảnPhòng Quản lý Công sản, Giá và Tài chính Doanh nghiệp, Sở Tài chính Bắc Kạn
Tên đối tượngCông ty TNHH MTV Xổ số kiến thiết tỉnh Bắc Kạn
Địa chỉSố 314, Đường Võ Nguyên Giáp, Tổ 1A, phường Phùng Chí Kiên, thành phố Bắc Kạn, tỉnh Bắc Kạn
MST
4700213346​
QĐ thành lập1180/QĐ-UBND ngày 04/7/2011 của UBND tỉnh Bắc Kạn.
Người đại diệnBà Đinh Thị Ven
Chức danhChủ tịch kiêm Giám đốc
Tổ chức/Cá nhânTổ chức
Hành vi 1Chứng từ kế toán không đủ chữ ký theo chức danh quy định trên chứng từ
QĐ 1Điểm đ, Khoản 2 Điều 8, Nghị định số 41/2018/NĐ-CP ngày 12/3/2018 của Chính phủ quy định xử phạt vi phạm hành chính trong lĩnh vực kế toán, kiểm toán độc lập.
 
Upvote 0
cảm ơn bác rất nhiều, ứng dụng rất hữu ích.

Tuy nhiên đối với trường hợp em đang ứng dụng thì số cột tiêu đề cần điền là khá nhiều (35 cột). Vậy có cách nào điều chỉnh theo dạng tiêu đề đặt theo dòng không ạ. Nếu được bác giúp thêm em vụ này ạ
Kiểu như này ạ
Tiêu đềNội dung cần điền
Người lập biên bảnTrần Thị Lý
Số biên bản01/BB-VPHC
Ngày tháng thời gian lập biên bản10h00 ngày 01/01/2022
Địa điểm lập biên bảnPhòng Quản lý Công sản, Giá và Tài chính Doanh nghiệp, Sở Tài chính Bắc Kạn
Tên đối tượngCông ty TNHH MTV Xổ số kiến thiết tỉnh Bắc Kạn
Địa chỉSố 314, Đường Võ Nguyên Giáp, Tổ 1A, phường Phùng Chí Kiên, thành phố Bắc Kạn, tỉnh Bắc Kạn
MST
4700213346​
QĐ thành lập1180/QĐ-UBND ngày 04/7/2011 của UBND tỉnh Bắc Kạn.
Người đại diệnBà Đinh Thị Ven
Chức danhChủ tịch kiêm Giám đốc
Tổ chức/Cá nhânTổ chức
Hành vi 1Chứng từ kế toán không đủ chữ ký theo chức danh quy định trên chứng từ
QĐ 1Điểm đ, Khoản 2 Điều 8, Nghị định số 41/2018/NĐ-CP ngày 12/3/2018 của Chính phủ quy định xử phạt vi phạm hành chính trong lĩnh vực kế toán, kiểm toán độc lập.
Sửa code lại từ cột thành dòng
 
Upvote 0
vâng em cũng đang mày mò, quan trọng là không phải code của mình nên mò hơi lâu và vẫn chưa ổn. hì hì
 
Upvote 0
(Xin phép được tách bài từ bài post của bác Maika8008 (Link) để tránh lẫn lộn khi trao đổi và do cũng tài lanh xen vào, gây loãng bài của bác ấy).


Trộn dữ liệu từ Excel sang Word
-------------------------------------------------------------------------------------------

Lấy cảm hứng từ ý tưởng và file của bác Maika8008, tôi cũng thiết kế một phiên bản khác cho việc Trộn dữ liệu từ Excel sang Word.
Phiên bản này tổng hợp các nhu cầu thực tế của người dùng đã trao đổi trong chủ để này, có thể chưa đầy đủ nhưng cũng đáp ứng cơ bản cho công việc.

* Các chức năng:
- Tùy chọn trộn dữ liệu: Một (hoặc nhiều) đối tượng cho một (hoặc nhiều) văn bản.
- Tự động tạo tiêu đề cột riêng, không ảnh hưởng đến thiết kế bảng.
- Không cần cố định vị trí (dòng, cột ) của dữ liệu cần trộn vì dùng tham chiếu qua Table name.
- Chỉ lấy những dòng dữ liệu sau khi dùng Filter trong bảng dữ liệu.
- Khắc phục lỗi khi trộn đoạn văn bản nhiều hơn 255 ký tự.
- Trộn có kèm luôn file hình ảnh (.jpg, .png, .bmp).
- Xuất file dạng .Docx, .PDF


Thiết kế cũng chưa bẫy lỗi gì nhiều, chắc chắn sẽ phát sinh lỗi khi thao tác, các bạn chạy kiểm tra thử nhé.
Tôi cũng đã thử dùng kết hợp tính năng Mail Merger có sẵn trong Word + VBA cho các tùy chọn nhưng tốc độ thực thi cũng không bằng một góc so với việc dùng thẳng Mail Merge (*) trong Word vì dù gì thì nó cũng đã qua code VBA để gọi tính năng Merge.

(*) Dùng Mail Merge trong Word rất nhanh nhưng nó chỉ đáp ứng tùy chọn cơ bản, đó là lý do có nhiều công cụ viết mở rộng thêm cho tính năng này.

Mã:
wdocSource.MailMerge.OpenDataSource...

Y9SHro3.png


e7fmRBR.png


Hướng dẫn sử dụng trong video.


* Đã cập nhật bẫy lỗi và chuyển sang kết nối muộn (Late binding) với Word để tránh lỗi giữa các phiên bản Office.

Link file (full code): https://www.mediafire.com/file/8fc086iogo32cie/MergeDataExcel2Word.zip/file
File word của em có ba bảng. Hướng dẫn giúp em cách trộn được`
(Xin phép được tách bài từ bài post của bác Maika8008 (Link) để tránh lẫn lộn khi trao đổi và do cũng tài lanh xen vào, gây loãng bài của bác ấy).


Trộn dữ liệu từ Excel sang Word
-------------------------------------------------------------------------------------------

Lấy cảm hứng từ ý tưởng và file của bác Maika8008, tôi cũng thiết kế một phiên bản khác cho việc Trộn dữ liệu từ Excel sang Word.
Phiên bản này tổng hợp các nhu cầu thực tế của người dùng đã trao đổi trong chủ để này, có thể chưa đầy đủ nhưng cũng đáp ứng cơ bản cho công việc.

* Các chức năng:
- Tùy chọn trộn dữ liệu: Một (hoặc nhiều) đối tượng cho một (hoặc nhiều) văn bản.
- Tự động tạo tiêu đề cột riêng, không ảnh hưởng đến thiết kế bảng.
- Không cần cố định vị trí (dòng, cột ) của dữ liệu cần trộn vì dùng tham chiếu qua Table name.
- Chỉ lấy những dòng dữ liệu sau khi dùng Filter trong bảng dữ liệu.
- Khắc phục lỗi khi trộn đoạn văn bản nhiều hơn 255 ký tự.
- Trộn có kèm luôn file hình ảnh (.jpg, .png, .bmp).
- Xuất file dạng .Docx, .PDF


Thiết kế cũng chưa bẫy lỗi gì nhiều, chắc chắn sẽ phát sinh lỗi khi thao tác, các bạn chạy kiểm tra thử nhé.
Tôi cũng đã thử dùng kết hợp tính năng Mail Merger có sẵn trong Word + VBA cho các tùy chọn nhưng tốc độ thực thi cũng không bằng một góc so với việc dùng thẳng Mail Merge (*) trong Word vì dù gì thì nó cũng đã qua code VBA để gọi tính năng Merge.

(*) Dùng Mail Merge trong Word rất nhanh nhưng nó chỉ đáp ứng tùy chọn cơ bản, đó là lý do có nhiều công cụ viết mở rộng thêm cho tính năng này.

Mã:
wdocSource.MailMerge.OpenDataSource...

Y9SHro3.png


e7fmRBR.png


Hướng dẫn sử dụng trong video.


* Đã cập nhật bẫy lỗi và chuyển sang kết nối muộn (Late binding) với Word để tránh lỗi giữa các phiên bản Office.

Link file (full code): https://www.mediafire.com/file/8fc086iogo32cie/MergeDataExcel2Word.zip/file
Cho em hỏi. Trong file word của em có ba vùng dữ liệu. Hướng dẫn giúp em cách làm. Em cảm ơn
 

File đính kèm

  • CUOC CHI HONG.docx
    18.2 KB · Đọc: 8
Upvote 0
mọi người cho em hỏi, em muốn thay đổi định dạng, ví dụ, viết thường và viết hoa, hay ngày tháng dạng dd/mm/yyyy và ngày/tháng/năm được không ạ?
 
Upvote 0
em thử mãi chưa được nên em lên đây hỏi, google đủ kiểu mà chưa được ạ
Trộn ngày tháng dạng dd/mm/yyyy mắc gì mà không được. Chứ bạn trộn dạng đó thì khi vào Word nó hiện ra kiểu gì?

Còn định dạng Ngày/Tháng/Năm là cái kiểu định dạng gì mà tôi chưa gặp bao giờ? Bạn cho ví dụ xem nó như thế nào!
 
Upvote 0
Trộn ngày tháng dạng dd/mm/yyyy mắc gì mà không được. Chứ bạn trộn dạng đó thì khi vào Word nó hiện ra kiểu gì?

Còn định dạng Ngày/Tháng/Năm là cái kiểu định dạng gì mà tôi chưa gặp bao giờ? Bạn cho ví dụ xem nó như thế nào!
dạ, xin lỗi chắc em diễn đạt chưa tốt ạ, ý em là ở bảng excel mình đang để dạng dd/mm/yyyy, muốn ra bản word nó hiện dạng ngày dd, tháng mm, năm yyyy.
nếu mailings thì em biết, nhưng theo mẫu bác ongke0711 thì em chưa làm được ạ.
 
Upvote 0
dạ, xin lỗi chắc em diễn đạt chưa tốt ạ, ý em là ở bảng excel mình đang để dạng dd/mm/yyyy, muốn ra bản word nó hiện dạng ngày dd, tháng mm, năm yyyy.
nếu mailings thì em biết, nhưng theo mẫu bác ongke0711 thì em chưa làm được ạ.
Gợi ý: với dữ liệu Excel bạn thêm 3 cột Ngày, Tháng, Năm với các hàm Day, Month, Year cho cột có dd/mm/yyyy nào đó.
 
Upvote 0
Web KT
Back
Top Bottom