Code VBA sao chép bảng tính Excel sang Word giữ định dạng – Blog Mẹo.VN

Trong những bài viết gần đây mình đã từng san sẻ với cách bạn cách sao chép bảng tính từ Word sang Excel mà vẫn giữ nguyên định dạng gốc hoặc ngược lại rồi .
Để tiếp nối đuôi nhau cho chủ đề đó, và đem đến cho bạn nhiều lựa chọn cũng như sự linh động hơn trong việc sao chép tài liệu bảng tính, thì ngày thời điểm ngày hôm nay mình sẽ liên tục san sẻ thêm một thủ pháp nhỏ khác nữa trong việc sử dụng code VBA, để sao chép bảng tính từ Excel sang file Word mà không bị biến hóa định dạng .

Mình nghĩ đây là một thủ thuật sẽ rất hữu ích cho những bạn thường xuyên phải làm việc với file Excel và Word đấy !

Đọc thêm :

  • Sao chép dữ liệu từ Excel sang Word vẫn giữ nguyên định dạng
  • Copy bảng từ Word sang PowerPoint vẫn giữ nguyên định dạng
  • Cách lưu file Excel, Word với định dạng PDF, giữ nguyên định dạng

Code VBA hỗ trợ sao chép bảng tính Excel sang Word giữ nguyên định dạng

+ Bước 1: Đầu tiên bạn mở file Excel của bạn lên. Tại đây, bạn mở tab Developer => và chọn Visual Basic. Hoặc nhanh hơn thì bạn nhấn tổ hợp phím Alt + F11 để mở trình soạn thảo code VBA.

sao-chep-bang-tinh-excel-sang-word-van-giu-dinh-dang-bang-code-vba (1)

+ Bước 2: Hộp thoại Microsoft Visual Basic for Applications hiện lên, tại đây bạn click menu Tools => và chọn References.

sao-chep-bang-tinh-excel-sang-word-van-giu-dinh-dang-bang-code-vba (2)

+ Bước 3: Bạn kích chọn Microsoft Word 16 Object Library tại hộp thoại References VBAProject với bản Office 2016. ( 15 với Office 2013, 14 với Office 2010, 12 với Office 2007 ).

=> Sau đó nhấn OK để tiếp tục.

sao-chep-bang-tinh-excel-sang-word-van-giu-dinh-dang-bang-code-vba (3)

+ Bước 4: Tiếp tục bạn click vào menu Insert => chọn Module.

sao-chep-bang-tinh-excel-sang-word-van-giu-dinh-dang-bang-code-vba (4)

+ Bước 5: Rồi Copy đoạn mã code sau:

Sub EXCEL_TO_WORD()
Range([A1], [A65536].End(3)).Resize(, 4).Copy
With CreateObject(“Word.Application”)
.Visible = True
.Documents.Add
.Selection.PasteSpecial Placement:=wdInLine, DataType:=wdPasteOLEObject
End With
End Sub

+ Bước 6: Và Paste vào hộp thoại Module1 (Code) như hình bên dưới.

Bây giờ bạn hãy chỉnh các thông số như vị trí hàng/cột bắt đầu được chọn, và số cột được Copy từ ô bắt đầu xuống dòng cuối cùng chứa ký tự => Cuối cùng nhấn Run để thực thi…

sao-chep-bang-tinh-excel-sang-word-van-giu-dinh-dang-bang-code-vba (5)

… Để Excel tự động hóa sao lưu bảng tính cùng định dạng những ô đã chọn sang file Word mới của bạn .

sao-chep-bang-tinh-excel-sang-word-van-giu-dinh-dang-bang-code-vba (6)sao-chep-bang-tinh-excel-sang-word-van-giu-dinh-dang-bang-code-vba (6)

Lời kết

Okay, vậy là mình vừa hướng dẫn xong cho các bạn mẹo nhỏ trong việc thực hiện copy bảng tính Excel sang Word giữ nguyên định dạng gốc bằng code VBA một cách cực kỳ nhanh chóng và chính xác rồi nhé.

Và đến đây bài hướng dẫn của mình cũng xin được tạm dừng. Hi vọng mẹo nhỏ trong việc sử dụng code VBA để vận dụng linh động hai ứng dụng văn phòng này sẽ hữu dụng với những bạn .
Chúc những bạn thành công xuất sắc !

Source: https://expgg.vn
Category: Thông tin

Total
0
Shares
Trả lời

Email của bạn sẽ không được hiển thị công khai. Các trường bắt buộc được đánh dấu *

Previous Post

Đánh giá iPhone 12 Pro Max: ai nên mua và ai thì không?

Next Post

Codec là gì? Những định dạng về Codec và lý do sử dụng

Related Posts