Mikki đang tìm cách thay đổi màu mặc định trên các nhận xét trên trang tính để cô ấy có thể phân biệt nhận xét của mình với nhận xét của người khác.

Khi bạn thêm nhận xét vào một ô trong trang tính, Excel cho phép bạn thay đổi định dạng được sử dụng cho nhận xét đó. Sau khi nhận xét được tạo, hãy làm theo các bước sau:

  1. Nhấp chuột phải vào ô và chọn Chỉnh sửa Nhận xét từ trình đơn Ngữ cảnh.

Điều này đặt điểm chèn trong nhận xét nơi bạn có thể nhập thêm thông tin, nếu muốn.

  1. Nhấp chuột phải vào đường viền của nhận xét và chọn Định dạng Nhận xét từ menu Ngữ cảnh kết quả. Excel sẽ hiển thị hộp thoại Định dạng Nhận xét.

  2. Sử dụng các điều khiển trong hộp thoại để thay đổi cách bạn muốn nhận xét xuất hiện.

  3. Bấm OK.

Các bước này đều ổn và tốt, nhưng chúng chỉ ảnh hưởng đến nhận xét hiện tại. Nếu bạn muốn đặt mặc định cho bất kỳ nhận xét nào bạn thêm vào trong tương lai, Excel sẽ không nhớ định dạng của bạn và nó không cung cấp cách nào để thực hiện thay đổi đối với giá trị mặc định. Thay vào đó, Excel lấy định dạng nhận xét mặc định từ chính Windows. Bạn có thể sửa đổi điều này bằng cách thay đổi các thuộc tính hiển thị cho Windows, cụ thể là cài đặt hiển thị Mẹo công cụ. Nếu bạn sửa đổi điều này, thì bạn đã sửa đổi cách Excel định dạng nhận xét của bạn. (Bạn cũng đã sửa đổi cách ToolTips xuất hiện trong mọi chương trình khác trên hệ thống của bạn.)

Một cách giải quyết là sử dụng macro để chèn nhận xét của bạn. Macro không chỉ có thể chèn nhận xét mà còn có thể định dạng nó theo nhu cầu của bạn.

Dưới đây là ví dụ về macro ngắn sẽ chèn chú thích cho ô đã chọn và nếu tên của người dùng là “Mikki”, hãy tạo màu nền là màu xanh ngọc. (Tên người dùng được xác định trong thiết lập cho Excel.)

Sub AddMyComment()

Dim sUserName As String     Dim  addr As String

sUserName = Application.UserName

With ActiveCell         addr = .Address

If sUserName = "Mikki" Then             ActiveSheet.Range(addr).AddComment             Range(addr).Comment.Shape.Select True             Selection.ShapeRange.Fill.ForeColor.SchemeColor = 41         Else             Range(addr).AddComment         End If     End With End Sub

Nếu bạn đã có một trang tính chứa nhiều nhận xét, bạn có thể muốn tìm các nhận xét có văn bản “Mikki” bên trong chúng và sau đó thay đổi màu của các nhận xét đó. Macro này phù hợp với hóa đơn:

Sub ColorMyComments1()

Dim myCom As Comment

For Each myCom In ActiveSheet.Comments     If InStr(myCom.Text, "Mikki") <> 0 Then         myCom.Shape.Fill.ForeColor.SchemeColor = 41     End If     Next myCom End Sub

Hiểu rằng macro sẽ thay đổi màu nếu văn bản “Mikki”

xuất hiện ở bất kỳ đâu trong văn bản bình luận. Một biến thể nhỏ của macro sẽ kiểm tra thuộc tính Author của nhận xét và nếu nó được đặt thành “Mikki”, thì nó sẽ thực hiện thay đổi:

Sub ColorMyComments2()

Dim myCom As Comment

For Each myCom In ActiveSheet.Comments     If myCom.Author = "Mikki" Then         myCom.Shape.Fill.ForeColor.SchemeColor = 41     End If     Next myCom End Sub

ExcelTips là nguồn của bạn để đào tạo Microsoft Excel hiệu quả về chi phí.

Mẹo này (12567) áp dụng cho Microsoft Excel 2007, 2010 và 2013.