VBA chuyển dữ liệu từ excel vào template word

Liên hệ QC

hoangha2711

Thành viên mới
Tham gia
12/7/18
Bài viết
7
Được thích
0
Em đã dùng vba để chuyển dữ liệu từ excel vào word được rồi ạ nhưng bị 1 cái là trong mục kính gửi các đơn vị do trình bày phải mỗi đơn vị xuống 1 dòng nhưng khi chuyển dữ liệu excel vào thì đều bị dàn ngang ra như văn bản bình thường. Cho em hỏi là bây giờ làm thế nào để các dòng trong ô kính gửi tự xuống dòng trong word sau khi trộn in vào ạ. Em cảm ơn ạ!
 

File đính kèm

  • Giấy mời họp TT.xls
    48.5 KB · Đọc: 27
  • Mau giay moi TT.docx
    21.6 KB · Đọc: 25
Em đã dùng vba để chuyển dữ liệu từ excel vào word được rồi ạ nhưng bị 1 cái là trong mục kính gửi các đơn vị do trình bày phải mỗi đơn vị xuống 1 dòng nhưng khi chuyển dữ liệu excel vào thì đều bị dàn ngang ra như văn bản bình thường. Cho em hỏi là bây giờ làm thế nào để các dòng trong ô kính gửi tự xuống dòng trong word sau khi trộn in vào ạ. Em cảm ơn ạ!
Đã nghĩ đến VBA thì sao bạn không nghĩ đến thiết kế giấy mời trên 1 sheet cho thuận tiện trong việc định dạng.
 
Upvote 0
Đã nghĩ đến VBA thì sao bạn không nghĩ đến thiết kế giấy mời trên 1 sheet cho thuận tiện trong việc định dạng.
Vì là do yêu cầu của sếp trên phải đúng chi tiết với thể thức văn bản chi tiết lắm nên em nghĩ thiết kế ra 1 sheet thì căn chỉnh nhiều với 1 cái nữa là vẫn ko giải quyết dc khâu phần kính gửi được nhiều dòng ạ :(.
 
Upvote 0
Vì là do yêu cầu của sếp trên phải đúng chi tiết với thể thức văn bản chi tiết lắm nên em nghĩ thiết kế ra 1 sheet thì căn chỉnh nhiều với 1 cái nữa là vẫn ko giải quyết dc khâu phần kính gửi được nhiều dòng ạ :(.
Ở trên chỉ là góp ý, còn làm cách gì là tùy bạn, riêng chỗ kính gửi bạn muốn gán thêm vào 100 dòng cùng lúc trong 1 Cell cũng được (Macro làm được tất).

Tôi nói thẳng:
Mấy quan bây giờ cứ quan trọng ba cái thể thức văn bản theo Thông tư 01, ngoài mặt thì luôn luôn quan tâm và luôn nêu cải cách thủ tục hành chánh, nhưng làm cái gì cũng quan trọng và đề cao cái quy trình, quy phạm chính vì vậy thủ tục càng lúc càng rườm rà phức tạp để hành dân.
Hồi xưa thủ tục làm 1 buổi, bây giờ có khi làm cả tuần cũng chẳng xong, làm ăn kiểu này thì đất nước càng ngày càng đi xuống hãy học cách làm của người Nhật, người Hàn vì sao kinh tế họ phát triển trong khi đất nước họ đồi núi chiếm đến 70 - 75% diện tích.

Trong khi đất nước ta hiện nay lúc nào các báo cáo cũng nêu quản lý tốt, nhưng thực tế rừng thì cạn kiệt, biển thì đã và đang ô nhiễm, tôi dự kiến khoảng 50 năm nữa thôi chúng ta sẽ không có chỗ tắm biển.
 
Lần chỉnh sửa cuối:
Upvote 0
Em đã dùng vba để chuyển dữ liệu từ excel vào word được rồi ạ nhưng bị 1 cái là trong mục kính gửi các đơn vị do trình bày phải mỗi đơn vị xuống 1 dòng nhưng khi chuyển dữ liệu excel vào thì đều bị dàn ngang ra như văn bản bình thường. Cho em hỏi là bây giờ làm thế nào để các dòng trong ô kính gửi tự xuống dòng trong word sau khi trộn in vào ạ. Em cảm ơn ạ!
Thay
Mã:
replacewith:=Sheet1.Cells(i + 1, j).Value
bằng
Mã:
replacewith:=Replace(Sheet1.Cells(i + 1, j).Value, vbLf, vbCr)
 
Upvote 0
Ở trên chỉ là góp ý, còn làm cách gì là tùy bạn, riêng chỗ kính gửi bạn muốn gán thêm vào 100 dòng cùng lúc trong 1 Cell cũng được (Macro làm được tất).

Tôi nói thẳng:
Mấy quan bây giờ cứ quan trọng ba cái thể thức văn bản theo Thông tư 01, ngoài mặt thì luôn luôn quan tâm và luôn nêu cải cách thủ tục hành chánh, nhưng làm cái gì cũng quan trọng và đề cao cái quy trình, quy phạm chính vì vậy thủ tục càng lúc càng rườm rà phức tạp để hành dân.
Hồi xưa thủ tục làm 1 buổi, bây giờ có khi làm cả tuần cũng chẳng xong, làm ăn kiểu này thì đất nước càng ngày càng đi xuống hãy học cách làm của người Nhật, người Hàn vì sao kinh tế họ phát triển trong khi đất nước họ đồi núi chiếm đến 70 - 75% diện tích.

Trong khi đất nước ta hiện nay lúc nào các báo cáo cũng nêu quản lý tốt, nhưng thực tế rừng thì cạn kiệt, biển thì đã và đang ô nhiễm, tôi dự kiến khoảng 50 năm nữa thôi chúng ta sẽ không có chỗ tắm biển.

Bạn ơi hình như nội qui diễn đàn cũng có đề cập việc nội dung bài viết không xen vào chuyện quốc gia ạ. Có thể nội dung đề cập không cụ thể rõ ràng nhưng theo em hiểu chúng ta không nên can thiệp vào chuyện chính trị, pháp luật.

Thực ra cái mà bạn nói thẳng tôi cho rằng qua những việc làm hành động thực tế của lãnh đạo thì trong suy nghĩ mỗi người dân bên dưới cũng có thể tự cảm nhận được rồi mà.

Híc nếu có gì sai mong nhận được giúp đỡ.

Trân trọng
 
Lần chỉnh sửa cuối:
Upvote 0
Bạn ơi hình như nội qui diễn đàn cũng có đề cập việc nội dung bài viết không xen vào chuyện quốc gia ạ. Có thể nội dung đề cập không cụ thể rõ ràng nhưng theo em hiểu chúng ta không nên can thiệp vào chuyện chính trị, pháp luật.

Thực ra cái mà bạn nói thẳng tôi cho rằng qua những việc làm hành động thực tế của lãnh đạo thì trong suy nghĩ mỗi người dân bên dưới cũng có thể tự cảm nhận được rồi mà.

Híc nếu có gì sai mong nhận được giúp đỡ.

Trân trọng
Bài 4 tôi chi nêu ra cái thực trạng và thực tế của Việt Nam, chứ tôi không liên quan gì đến đến chính trị.
Bạn hãy tự kiểm nghiệm lại những vấn đề tôi đã nêu và hãy tự tìm hiểu và so sánh kinh tế của người Nhật và người Hàn Quốc để hiểu.
 
Upvote 0
Bài 4 tôi chi nêu ra cái thực trạng và thực tế của Việt Nam, chứ tôi không liên quan gì đến đến chính trị.
Bạn hãy tự kiểm nghiệm lại những vấn đề tôi đã nêu và hãy tự tìm hiểu và so sánh kinh tế của người Nhật và người Hàn Quốc để hiểu.

Thứ nhất tôi thấy trong box này bàn về excel thì bạn lại có ý kiến về đường lối chính sách của cơ quan nhà nước.
Có thể bạn thừa khả năng để giúp đỡ chủ thớt nhưng bạn không giúp mà bạn lại có ý kiến là cấp trên thế này thế kia. Cấp dưới cũng chỉ biết làm theo lệnh của cấp trên, nếu cứ nói thẳng như bạn thì cũng chẳng có kỷ luật trật tự trên dưới gì hết.

Thứ hai theo tôi hiểu nội quy của diễn đàn chúng ta cũng không nên có ý kiến ý cò gì đối với cơ quan nhà nước ở tại diễn đàn này.

Nội quy bằng văn bản chứ không phải là một phép toán hay một con số cụ thể và cũng chỉ thể hiện được chung chung ngắn gọn khái quát để người đọc dễ nắm được một cách tổng thể chứ không thể dài lê thê chi tiết như bộ luật được nên tôi cũng không muốn tranh luận thêm.
Mỗi người đọc đều có những cảm nhận khác nhau chính vì thế mà mới khó tránh khỏi việc xảy ra vấn đề khiếu nại về chủ đề bị khóa.

Tôi xin hết
 
Lần chỉnh sửa cuối:
Upvote 0
Thay
Mã:
replacewith:=Sheet1.Cells(i + 1, j).Value
bằng
Mã:
replacewith:=Replace(Sheet1.Cells(i + 1, j).Value, vbLf, vbCr)
Em cảm ơn bác ạ.
Bài đã được tự động gộp:

Thứ nhất tôi thấy trong box này bàn về excel thì bạn lại có ý kiến về đường lối chính sách của cơ quan nhà nước.
Có thể bạn thừa khả năng để giúp đỡ chủ thớt nhưng bạn không giúp mà bạn lại có ý kiến là cấp trên thế này thế kia. Cấp dưới cũng chỉ biết làm theo lệnh của cấp trên, nếu cứ nói thẳng như bạn thì cũng chẳng có kỷ luật trật tự trên dưới gì hết.

Thứ hai theo tôi hiểu nội quy của diễn đàn chúng ta cũng không nên có ý kiến ý cò gì đối với cơ quan nhà nước ở tại diễn đàn này.

Nội quy bằng văn bản chứ không phải là một phép toán hay một con số cụ thể và cũng chỉ thể hiện được chung chung ngắn gọn khái quát để người đọc dễ nắm được một cách tổng thể chứ không thể dài lê thê chi tiết như bộ luật được nên tôi cũng không muốn tranh luận thêm.
Mỗi người đọc đều có những cảm nhận khác nhau chính vì thế mà mới khó tránh khỏi việc xảy ra vấn đề khiếu nại về chủ đề bị khóa.

Tôi xin hết
Bài 4 tôi chi nêu ra cái thực trạng và thực tế của Việt Nam, chứ tôi không liên quan gì đến đến chính trị.
Bạn hãy tự kiểm nghiệm lại những vấn đề tôi đã nêu và hãy tự tìm hiểu và so sánh kinh tế của người Nhật và người Hàn Quốc để hiểu.

Em biết là nhiều khi cũng có cái bức xúc nhưng mà mình là lính nhiều khi ko thể cãi đc mà những cái vĩ mô như bác be09 nói thì mình chỉ biết mặt ngoài, nhiều cái bên trong ko biêt được đâu bác. Thôi các bác đừng cãi nhau nữa :(
 
Lần chỉnh sửa cuối:
Upvote 0
Em cảm ơn bác ạ.
Bài đã được tự động gộp:




Em biết là nhiều khi cũng có cái bức xúc nhưng mà mình là lính nhiều khi ko thể cãi đc mà những cái vĩ mô như bác be09 nói thì mình chỉ biết mặt ngoài, nhiều cái bên trong ko biêt được đâu bác. Thôi các bác đừng cãi nhau nữa :(
code vẫn bị lỗi trong mục " kính gửi"
 
Upvote 0
Chình trị thì tôi không biết, nhưng Kinh Tế thì tôi khá đầy đủ căn bản.
Đồi núi thì liên quan gì đến kinh tế phát triển nhỉ? Âu châu nó cũng nhìn vào Thụy Sĩ và bảo "sao nhiều đồi núi mà..." ?
Nếu thống kê thì Nhật và Hàn cũng là những nước có tỷ lệ tự tử nhiều nhất.
 
Upvote 0
Web KT
Back
Top Bottom