Excel có chức năng tự động đặt màu nền cho các giá trị không?


0

Hôm qua tôi đã phân tích một tập tin từ Torque, một ứng dụng ghi dữ liệu từ ô tô và xe máy. Nó chứa dữ liệu như RPM, tốc độ, tăng tốc, vị trí bướm ga và nhiều hơn nữa.

Để có cái nhìn tổng quan hơn, tôi đã tính tối thiểu và tối đa từ mỗi cột. Sau đó, tôi đặt tất cả các giá trị RPM trên 9.000 thành màu đỏ sẫm, 7.000 màu đỏ nhạt và dưới 1.500 thành màu xám. Tôi đã làm điều này cho hầu hết các cột và tôi đã làm nó bằng tay.

Excel có bao gồm một chức năng để làm điều này tự động không. Tôi không muốn nhập các giá trị tối thiểu và tối đa hoặc nói màu đỏ nên dành cho các giá trị 8.000 đến 9.000 hoặc đại loại như thế này. Ý tưởng của tôi là một hàm như vậy phát hiện các giá trị tối thiểu và tối đa và tần suất chúng ở trong trang tính. Sau đó, tức là 10% giá trị hàng đầu phải có một màu và tương tự với các giá trị khác. Về cơ bản tôi muốn nhấp vào một nút và sau đó tôi muốn có màu sắc hữu ích cho tất cả các cột.

Hàm như vậy có tồn tại trong Excel hoặc dưới dạng bổ trợ không?


2
Nó được gọi là "định dạng có điều kiện" (Chính - Kiểu - Định dạng có điều kiện). Nghiên cứu tất cả các biến thể điều kiện có sẵn trong nó.
Akina

2
Sử dụng Định dạng có điều kiện, như @Akina đề xuất, tôi sẽ đề xuất "Vảy màu". Nó sẽ tự động áp dụng độ dốc màu dựa trên các giá trị.
Rob Gale

Cảm ơn. Nếu một trong các bạn đưa ra câu trả lời thì tôi có thể nâng cấp nó ...
Edgar

@Edgar, không có gì xảy ra trừ khi hành động chưa được thiết lập sẽ xảy ra ,,, Nếu bạn cố gắng sử dụng ngay cả một Hàm, bạn cần tạo Thuật toán theo cách thức, thời điểm & amp; tại sao một hành động sẽ diễn ra Tôi chắc chắn trong quá khứ gần đây tôi đã đăng một câu trả lời rằng làm thế nào để áp dụng Màu nền cho Phạm vi ô bằng Excel VBA (MAcro).
Rajesh S

Câu trả lời:


0

Mã VBA (Macro) này sẽ giúp bạn tự động làm nổi bật Tối đa & amp; Giá trị tối thiểu trong Bảng hoạt động.

Thay vì sử dụng Phạm vi dữ liệu được mã hóa cứng, các vòng mã thông qua bất kỳ cột nào được sử dụng và điều chỉnh chúng để có độ dài khác nhau.

Ngoài ra, tôi giả sử các tiêu đề trong Bảng hoạt động.

Private Sub Worksheet_Activate()
Dim Myrng As Range
Dim rng As Range
Dim lCol As Long
Dim lLastRow As Long

ActiveSheet.Cells.Interior.ColorIndex = xlColorIndexNone

  With ActiveSheet
    For lCol = 2 To .UsedRange.Columns.Count

      lLastRow = .Cells(.Rows.Count, lCol).End(xlUp).Row
      Set rng = .Range(.Cells(2, lCol), .Cells(lLastRow, lCol))

      For Each Myrng In rng

       If Myrng.value = Application.WorksheetFunction.Max(rng) Then
        Myrng.Interior.ColorIndex = 6
       End If

       If Myrng.value = Application.WorksheetFunction.Min(rng) Then
        Myrng.Interior.ColorIndex = 10
       End If

      Next
    Next lCol
  End With

End Sub

Làm thế nào nó hoạt động:

  • Sao chép & amp; Dán mã VBA này làm Mô-đun chuẩn với Bảng.
  • Mã sẽ làm nổi bật Max & amp; Giá trị tối thiểu trong mỗi cột cho phạm vi được sử dụng trong Trang tính ngay khi bạn kích hoạt (trên Chuột Nhấp vào Tab Trang tính).
  • Điều chỉnh Màu nền nếu cần.
Khi sử dụng trang web của chúng tôi, bạn xác nhận rằng bạn đã đọc và hiểu Chính sách cookieChính sách bảo mật của chúng tôi.
Licensed under cc by-sa 3.0 with attribution required.