Làm thế nào để xuất nhận xét từ Excel sang Word?

Đối với người dùng Excel, việc chèn chú thích vào ô là một công việc phổ biến, đôi khi, bạn cần sao chép và dán những chú thích này vào tài liệu Word cho một số mục đích. Tất nhiên, bạn có thể sao chép và dán từng nhận xét vào Word, nhưng đây là một công việc tẻ nhạt và tốn thời gian. Có cách nào để xuất tất cả các nhận xét từ Excel sang Word cùng một lúc không?

Xuất nhận xét từ trang tính hiện tại sang Word với mã VBA

Xuất nhận xét từ trang tính hiện tại sang Word với mã VBA

Rất tiếc, Excel không cung cấp tính năng sao chép và dán tất cả các nhận xét vào Word cùng một lúc. Tuy nhiên, với mã VBA sau, bạn có thể nhanh chóng xuất tất cả nhận xét của trang tính đang hoạt động sang tài liệu Word.

1. Giữ ALT + F11 phím để mở Cửa sổ Microsoft Visual Basic for Applications.

2. Nhấp chuột Chèn > Mô-đunvà dán mã sau vào Cửa sổ mô-đun.

Mã VBA: Xuất nhận xét từ trang tính hiện tại sang Word

Sub CopyCommentsToWord()
'Update 20140325
Dim xComment As Comment
Dim wApp As Object
On Error Resume Next
Set wApp = GetObject(, "Word.Application")
If Err.Number <> 0 Then
  Err.Clear
  Set wApp = CreateObject("Word.Application")
End If
wApp.Visible = True
wApp.Documents.Add DocumentType:=0
For Each xComment In Application.ActiveSheet.Comments
    wApp.Selection.TypeText xComment.Parent.Address & vbTab & xComment.Text
    wApp.Selection.TypeParagraph
Next
Set wApp = Nothing
End Sub

3. Sau đó nhấn F5 để chạy mã này và tất cả nhận xét trong trang tính hiện hoạt đã được xuất sang tài liệu Word mới với địa chỉ ô của nó. Xem ảnh chụp màn hình:

Các bài liên quan:

Làm cách nào để nhanh chóng chèn nhận xét vào nhiều ô trong Excel?

Làm cách nào để thay đổi hình dạng của hộp nhận xét trong Excel?

Làm cách nào để thay đổi tất cả các định dạng nhận xét trong các ô trong Excel?

Làm cách nào để thay đổi tên tác giả của tất cả các bình luận trong Excel?