Chèn table vào comment

[phibonaxi]

Chào các Anh Chị.

Có cách nào để mình chèn thêm một bảng tính (table) vào trong một comment không?
Vì mình không biết đặt bài này ở box nào, mong Mod đừng xóa và chuyển dùm qua box thích hợp.

Thanks

 

[SA_DQ]

Mình tìm giúp bạn trên mạng & hiện thấy 2 cách sau

(1) Chép vùng ô đó thành hình ảnh & sau đó người ta gán hình đó vô trở thành comment của ô;

( Về việc đưa hình vô thành comment thì tham khảo thêm ở fần thích hợp của chữ ký của mình)

(2) Bạn chạy code này

Option Explicit
Sub AddToComment()
 ' From Ozgrid.com & Thanks'
 Dim rCell As Range:                Dim cCom As Comment
 Dim Max_ As Byte, Col As Byte, jJ As Byte, Bu As Byte 

 For Each rCell In Range("B4:E8")
   If Max_ < Len(rCell.Value) Then Max_ = Len(rCell.Value)
 Next rCell
 With Range("A1")
   .ClearComments
   Set cCom = .AddComment
 End With
 Col = Range("B4:E8").Columns.Count
 For Each rCell In Range("B4:E8")
   jJ = jJ + 1:                     Bu = Max_ - Len(rCell.Value)
   If Bu < 6 Then Bu = Switch(Bu = 0, 0, Bu = 1, 2, Bu = 2, 3, Bu = 3, 5, Bu = 4, 6, Bu = 5, 8)
   cCom.Text Text:=cCom.Text & rCell.Text & Space(2 + Bu) & "|" & IIf(jJ Mod Col = 0, Chr(10), "")
 Next rCell
End Sub