Insert comment với size chữ theo ý muốn

[meovang]

Em thường dùng Insert comment để chú thích trong bảng tính Excel nhưng có trở ngại 1 chút là cở chữ trong ô chú thích hơi nhỏ, mỗi lần như vậy em phải chỉnh lại theo kiểu thủ công rất mất thời gian. Nhờ các anh chị chỉ giúp em cách nào nhanh hơn không? Cám ơn các anh chị nhiều

 

[SA_DQ]

http://www.giaiphapexcel.com/forum/showthread.php?t=432​

Phần tác động lên kích cỡ comment í!


Chúc xuân vui vẽ!!


http://www.nowupload.com/:EMQ​

 

[salam]

Tôi hay dùng code này copy trên mạng. Bạn thử xem

Code:
Sub FormatAllComments()
Dim ws As Worksheet
Dim cmt As Comment
For Each ws In ActiveWorkbook.Worksheets
For Each cmt In ws.Comments
With cmt.Shape.TextFrame.Characters.Font
.Name = "Times New Roman" 'Thay đổi font chữ
.Size = 20 'Thay đổi cỡ chữ
End With
Next cmt
Next ws
End Sub

Bạn nhấn Alt+F11 để vào VBE sau đó copy đoạn mã trên vào và chạy nó là được.
Trong file kèm bạn xem nhé!