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

Liên hệ QC

Người dùng đang xem chủ đề này

ongke0711

Thành viên gắn bó
Tham gia
7/9/06
Bài viết
2,281
Được thích
3,054
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ó cách nào để tạo bảng bị merge nhiều cột không bạn ơi !
 
Upvote 0
Cám ơn Anh (ongke0711) đã chia sẻ. Khi mình tạo thêm nhiều cột thì không chọn được vùng dữ liệu từ sau cột Y, Z... mong Anh fix giúp để có thể chọn được nhiều cột dữ liệu hơn nữa trong quá trình trộn dữ liệu.
 

File đính kèm

  • them du lieu.png
    them du lieu.png
    158.2 KB · Đọc: 14
  • IN SO.xlsb
    IN SO.xlsb
    97.2 KB · Đọc: 6
Upvote 0
Cám ơn Anh (ongke0711) đã chia sẻ. Khi mình tạo thêm nhiều cột thì không chọn được vùng dữ liệu từ sau cột Y, Z... mong Anh fix giúp để có thể chọn được nhiều cột dữ liệu hơn nữa trong quá trình trộn dữ liệu.
Lỗi là do cái table range thay đổi nhưng chưa cập nhật lại. Tôi đã thêm code để người dùng cập nhật lại vùng dữ liệu (range) khi có thay đổi.
File đính kèm.
 

File đính kèm

Upvote 0
Hình như khi xuất dữ liệu ra file chỉ có thể xuất 1 dòng, hoặc 1 chuỗi dòng liên tiếp (bằng cách kéo, thả chuột) phải không bác? Em thử chọn từng dòng không liên tiếp nhau (bấm giữ Ctrl, đồng thời chọn dòng mong muốn xuất dữ liệu) thì nó không ra kết quả như mong muốn. Nhờ bác chủ tus kiểm tra có đúng thế ko ạ? Nếu đúng thì giúp em cách sửa với
Bạn này bị giống mình này, khi sử dụng filter, thì nếu quét 1 số hàng trong filter đó thì số dòng xuất file ra không đúng như mong muốn. Mong ad kiểm tra lại code phần này (sau khi filter). Xin cảm ơn
 
Upvote 0
Web KT

Bài viết mới nhất

Back
Top Bottom