lấy comment của 1 cell cho hiện ra cell khác!

[tomato_qs]

Chào mọi người ạ,
Các bác cho em hỏi có cách nào để lấy được comment của 1 cell không ạ, comment đó cho hiện ra 1 cell khác ạ? Em đang cần gấp.Mong nhận được hồi âm sớm.
Em xin cám ơn.

 

[Hai Lúa Miền Tây]

Chào mọi người ạ,
Các bác cho em hỏi có cách nào để lấy được comment của 1 cell không ạ, comment đó cho hiện ra 1 cell khác ạ? Em đang cần gấp.Mong nhận được hồi âm sớm.
Em xin cám ơn.

Dùng hàm sau:

Function GetCommentText(rCommentCell As Range)

Dim strGotIt As String

    On Error Resume Next

        strGotIt = WorksheetFunction.Clean(rCommentCell.Comment.Text)

            GetCommentText = strGotIt

    On Error GoTo 0

End Function

Nguồn: http://www.ozgrid.com/VBA/ExtractCommentText.htm

 

[ndu96081631]

Dùng hàm sau:

Function GetCommentText(rCommentCell As Range)

Dim strGotIt As String

    On Error Resume Next

        strGotIt = WorksheetFunction.Clean(rCommentCell.Comment.Text)

            GetCommentText = strGotIt

    On Error GoTo 0

End Function

Nguồn: http://www.ozgrid.com/VBA/ExtractCommentText.htm

Theo tôi thì không nên dùng hàm CLEAN ---> Comment thế nào cứ để nguyên thế ---> Người ta có xuống dòng thì kết quả của mình cũng phải xuống dòng

Function GetComment(CelComment As Range) As String
  On Error Resume Next
  GetComment = CelComment.Comment.Text
End Function

Đang nghiên cứu cách dùng công thức mà khó ăn quá!

 

[vsxmm]

Theo tôi thì không nên dùng hàm CLEAN ---> Comment thế nào cứ để nguyên thế ---> Người ta có xuống dòng thì kết quả của mình cũng phải xuống dòng

Function GetComment(CelComment As Range) As String
  On Error Resume Next
  GetComment = CelComment.Comment.Text
End Function

Đang nghiên cứu cách dùng công thức mà khó ăn quá!

Có cách nào lấy comment hình ảnh (Thêm vào bằng cách Format Comment...\Colors and lines\Fill \Fill effects\Picture\ Seclect picture). Ví dụ Tôi cần lấy hình ảnh trong comment của ô b2 ra ô c2 thì tôi làm như thế nào. Tôi Cảm ơn nhiều.

 

[ndu96081631]

Có cách nào lấy comment hình ảnh (Thêm vào bằng cách Format Comment...\Colors and lines\Fill \Fill effects\Picture\ Seclect picture). Ví dụ Tôi cần lấy hình ảnh trong comment của ô b2 ra ô c2 thì tôi làm như thế nào. Tôi Cảm ơn nhiều.

Thì copy cell B2, xong Paste Special\Comments sang C2 là xong

 

[vsxmm]

Thì copy cell B2, xong Paste Special\Comments sang C2 là xong

Vậy bạn có cách nào viết một hàm bằng VBA để dùng nhiều chổ được không bạn. Cảm ơn nhiều

 

[ndu96081631]

Vậy bạn có cách nào viết một hàm bằng VBA để dùng nhiều chổ được không bạn. Cảm ơn nhiều

Nếu Insert 1 comment mới đồng thời lấy hình từ trong máy tính chèn vào comment này thì được... Tham khảo tại đây:
http://www.giaiphapexcel.com/forum/showthread.php?51408-Chèn-hình-vào-cell-bằng-hàm-tự-tạo
Ở đây bạn muốn lấy hình từ 1 comment đang có sẵn rồi chèn hình ấy vào 1 cell khác thì cái này không thể viết thành hàm được rồi... Code VBA đương nhiên làm được điều này như không thể hoạt động như 1 hàm, chỉ có thể viết thành 1 Sub, nhấn nút, code chạy, hình được lấy vào chèn vào cell bạn muốn
Thế thôi

 

[vsxmm]

Nếu Insert 1 comment mới đồng thời lấy hình từ trong máy tính chèn vào comment này thì được... Tham khảo tại đây:
http://www.giaiphapexcel.com/forum/showthread.php?51408-Chèn-hình-vào-cell-bằng-hàm-tự-tạo
Ở đây bạn muốn lấy hình từ 1 comment đang có sẵn rồi chèn hình ấy vào 1 cell khác thì cái này không thể viết thành hàm được rồi... Code VBA đương nhiên làm được điều này như không thể hoạt động như 1 hàm, chỉ có thể viết thành 1 Sub, nhấn nút, code chạy, hình được lấy vào chèn vào cell bạn muốn
Thế thôi

Thật là tiếc quá. nhưng dù sao thành sub cũng được. bạn có thể chia sẻ với mọi người với. và có thể giúp mình luôn với vì công việc của mình cũng cần điều này

 

[tuleanhbd]

Xin lỗi có ai còn quan tâm chủ đề này không, cho mình hỏi với. Ví dụ như mình chọn luôn cả 1 vùng rồi lấy comment trong từng ô ra rồi gọp lại luôn có được không.

 

[tam888]

Xin lỗi có ai còn quan tâm chủ đề này không, cho mình hỏi với. Ví dụ như mình chọn luôn cả 1 vùng rồi lấy comment trong từng ô ra rồi gọp lại luôn có được không.

Được nếu bạn áp dụng VBA để viết code... bắt tay vào viết code, mắc đâu hỏi tiếp - công thức thì khó