Nhiều người sử dụng các tính năng định dạng có điều kiện của Excel để thu hút sự chú ý đến các giá trị hoặc khu vực cụ thể trong trang tính của họ. Ví dụ: một ô có thể được định dạng để nội dung của nó được hiển thị bằng màu đỏ hoặc in đậm nếu trên hoặc dưới một ngưỡng nhất định.

Tuy nhiên, điều còn thiếu là một cách để làm cho nội dung của ô nhấp nháy hoặc nhấp nháy và tắt. Để có được một kỳ tích như vậy, bạn chỉ có thể sử dụng các thiết bị của riêng bạn và điều kỳ diệu của macro. Bằng cách sử dụng các công cụ này, bạn có thể làm cho các ô nhấp nháy bằng cách thiết kế một kiểu đặc biệt cho các ô nhấp nháy, sau đó chạy một macro đơn giản.

Để tạo kiểu đặc biệt, hãy làm theo các bước sau:

  1. Chọn ô bạn muốn bật và tắt đèn flash.

  2. Chọn Kiểu từ menu Định dạng. Excel sẽ hiển thị hộp thoại Kiểu. (Xem Hình 1.)

  3. Trong hộp Tên kiểu, hãy nhập tên kiểu mới. (Đối với ví dụ này, hãy sử dụng tên kiểu Flashing.)

  4. Sử dụng các điều khiển trong hộp thoại, sửa đổi bất kỳ thuộc tính nào cho kiểu, như bạn muốn.

  5. Nhấp vào OK.

Bây giờ bạn có thể áp dụng kiểu cho bất kỳ ô nào khác mà bạn muốn trong sổ làm việc của mình. Bây giờ tạo các macro (có hai macro), như sau:

Dim NextTime As Date

Sub StartFlash()

NextTime = Now + TimeValue("00:00:01")

With ActiveWorkbook.Styles("Flashing").Font         If .ColorIndex = xlAutomatic Then .ColorIndex = 3         .ColorIndex = 5 - .ColorIndex     End With     Application.OnTime NextTime, "StartFlash"

End Sub

Sub StopFlash()

Application.OnTime NextTime, "StartFlash", schedule:=False     ActiveWorkbook.Styles("Flashing").Font.ColorIndex = xlAutomatic End Sub

Để bắt đầu nhấp nháy các mục, chỉ cần chạy StartFlash. Các ô được định dạng với kiểu Nhấp nháy sẽ xen kẽ giữa văn bản màu đỏ và trắng khoảng một lần một giây. Khi bạn muốn tắt tính năng nhấp nháy, chỉ cần chạy macro StopFlash.

Có một điều quan trọng cần lưu ý về macro này: biến NextTime được khai báo outside của thủ tục thực tế mà nó được sử dụng. Điều này được thực hiện để NextTime duy trì giá trị của nó từ lần gọi StartFlash đến lần tiếp theo.

_Lưu ý: _

Nếu bạn muốn biết cách sử dụng các macro được mô tả trên trang này (hoặc trên bất kỳ trang nào khác trên trang ExcelTips), tôi đã chuẩn bị một trang đặc biệt bao gồm thông tin hữu ích.

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

Mẹo này (2134) áp dụng cho Microsoft Excel 97, 2000, 2002 và 2003. Bạn có thể tìm thấy phiên bản của mẹo này cho giao diện ribbon của Excel (Excel 2007 trở lên) tại đây: