Cách xuất nhận xét trong Excel sang Word Doc

Một sổ làm việc Excel có thể chứa hàng tá ý kiến ​​từ các biên tập viên khác nhau. Những bình luận này vẫn có liên quan nhất khi được gắn vào các ô liên kết của chúng, nhưng chúng cũng có thể tạo thành một câu chuyện của riêng chúng. Ví dụ: nếu bạn và đồng nghiệp chỉnh sửa bảng chiếu bán hàng cùng nhau, các nhận xét của trang tính sẽ theo dõi cuộc trò chuyện của bạn về công thức của trang tính. Một cách để cô lập các nhận xét này là viết một macro Visual Basic gửi chúng đến một tài liệu Word.

1.

Mở sổ làm việc Excel, sau đó nhấn "Alt-F11" để mở trình soạn thảo Visual Basic của Excel.

2.

Bấm đúp vào mô-đun "NewMacros" trong thư mục Mô-đun của cửa sổ Dự án, nếu Word không tự động mở.

3.

Nhập nội dung sau để mở macro mới:

Sub mcrVer ()

4.

Nhập thông tin sau để khai báo các biến của macro:

Dim excelVer As Comment Dim wordProgram As Object

5.

Nhập nội dung sau để tạo tài liệu Word:

Đặt wordProgram = CreateObject ("Word.Application")

6.

Nhập nội dung sau để mở vòng lặp hoạt động trên đối tượng Word:

Với chương trình wordPro

7.

Nhập nội dung sau để mở và chọn tài liệu Word:

.Visible = True .Document.Add DocumentType: = 0

số 8.

Nhập nội dung sau để mở một vòng lặp hoạt động trên mỗi bình luận:

Đối với mỗi excelVer trong ActiveSheet.Comments

9.

Nhập nội dung sau để in tác giả và địa chỉ ô của từng nhận xét vào tài liệu Word:

.Selection.TypeText excelVer.Parent.Address & vbTab & excelVer.Text

10.

Nhập nội dung sau để in từng nhận xét vào tài liệu Word:

.Selection.TypePar Đoạn

11.

Nhập nội dung sau để đóng vòng lặp For-Next:

Kế tiếp

12.

Nhập thông tin sau để đóng vòng lặp With:

Kết thúc với

13.

Nhập nội dung sau để đóng macro:

Kết thúc phụ

14.

Nhấn "F5" để chạy macro và xuất các nhận xét sang tài liệu Word.