Định dạng có điều kiện trong Excel
Định dạng có điều kiện trong Excel cho phép bạn xác định các quy tắc xác định định dạng ô.
Ví dụ: bạn có thể tạo quy tắc đánh dấu các ô đáp ứng các tiêu chí nhất định. Những ví dụ bao gồm:
- Các số nằm trong một phạm vi nhất định (ví dụ: nhỏ hơn 0).
- 10 mục hàng đầu trong danh sách.
- Tạo "bản đồ nhiệt".
- Quy tắc "dựa trên công thức" cho hầu như mọi định dạng có điều kiện.
Trong Excel, Định dạng có Điều kiện có thể được tìm thấy trong Ruy-băng bên dưới Trang chủ> Kiểu (ALT> H> L).
Để tạo quy tắc của riêng bạn, hãy nhấp vào 'Quy tắc mới' và một cửa sổ mới sẽ xuất hiện:
Định dạng có điều kiện trong VBA
Tất cả các tính năng Định dạng có điều kiện này có thể được truy cập bằng VBA.
Lưu ý rằng khi bạn thiết lập định dạng có điều kiện từ bên trong mã VBA, các tham số mới của bạn sẽ xuất hiện trong cửa sổ định dạng có điều kiện giao diện người dùng của Excel và sẽ hiển thị cho người dùng. Người dùng sẽ có thể chỉnh sửa hoặc xóa chúng trừ khi bạn đã khóa trang tính.
Các quy tắc định dạng có điều kiện cũng được lưu khi trang tính được lưu
Quy tắc định dạng có điều kiện áp dụng cụ thể cho một trang tính cụ thể và cho một phạm vi ô cụ thể. Nếu chúng cần thiết ở nơi khác trong sổ làm việc, thì chúng cũng phải được thiết lập trên trang tính đó.
Sử dụng thực tế của định dạng có điều kiện trong VBA
Bạn có thể có một lượng lớn dữ liệu thô được nhập vào trang tính của mình từ tệp CSV (các giá trị được phân tách bằng dấu phẩy) hoặc từ bảng hoặc truy vấn cơ sở dữ liệu. Điều này có thể chảy vào trang tổng quan hoặc báo cáo, với các số thay đổi được nhập từ kỳ này sang kỳ khác.
Khi một số thay đổi và nằm ngoài phạm vi chấp nhận được, bạn có thể muốn làm nổi bật điều này, ví dụ: màu nền của ô là màu đỏ và bạn có thể thực hiện việc này khi thiết lập định dạng có điều kiện. Bằng cách này, người dùng sẽ ngay lập tức bị thu hút bởi con số này và sau đó có thể điều tra lý do tại sao điều này lại xảy ra.
Bạn có thể sử dụng VBA để bật hoặc tắt định dạng có điều kiện. Bạn có thể sử dụng VBA để xóa các quy tắc trên một loạt ô hoặc bật lại chúng. Có thể xảy ra trường hợp có lý do hoàn toàn chính đáng cho một con số bất thường, nhưng khi người dùng trình bày bảng điều khiển hoặc báo cáo với cấp quản lý cao hơn, họ muốn có thể gỡ bỏ 'hồi chuông cảnh báo'.
Ngoài ra, trên dữ liệu được nhập thô, bạn có thể muốn đánh dấu nơi các con số lớn hoặc nhỏ một cách kỳ cục. Phạm vi dữ liệu được nhập thường có kích thước khác nhau cho mỗi khoảng thời gian, vì vậy bạn có thể sử dụng VBA để đánh giá kích thước của phạm vi dữ liệu mới và chỉ chèn định dạng có điều kiện cho phạm vi đó.
Bạn cũng có thể gặp trường hợp có một danh sách các tên được sắp xếp với các giá trị số so với mỗi tên, ví dụ: lương nhân viên, điểm thi. Với định dạng có điều kiện, bạn có thể sử dụng màu chia độ để đi từ cao nhất đến thấp nhất, trông rất ấn tượng cho mục đích trình bày.
Tuy nhiên, danh sách tên sẽ không phải lúc nào cũng có kích thước tĩnh và bạn có thể sử dụng mã VBA để làm mới tỷ lệ màu đã chia theo những thay đổi về kích thước của phạm vi.
Một ví dụ đơn giản về việc tạo định dạng có điều kiện trên một phạm vi
Ví dụ này thiết lập định dạng có điều kiện cho một dải ô (A1: A10) trên trang tính. Nếu số trong phạm vi từ 100 đến 150 thì màu nền của ô sẽ là màu đỏ, ngược lại nó sẽ không có màu.
| 1234567891011121314 | Sub ConditionalFormattingExample ()‘Xác định phạm viDim MyRange As RangeĐặt MyRange = Phạm vi (“A1: A10”)‘Xóa định dạng có điều kiện hiện tại khỏi phạm viMyRange.FormatConditions.Delete‘Áp dụng định dạng có điều kiệnMyRange.FormatConditions.Add Type: = xlCellValue, Operator: = xlBetween, _Công thức1: = "= 100", Công thức2: = "= 150"MyRange.FormatConditions (1) .Interior.Color = RGB (255, 0, 0)Kết thúc Sub |
Lưu ý rằng trước tiên chúng ta xác định phạm vi MyRange để áp dụng định dạng có điều kiện.
Tiếp theo, chúng tôi xóa mọi định dạng có điều kiện hiện có cho phạm vi. Đây là một ý tưởng hay để ngăn không cho cùng một quy tắc được thêm vào mỗi khi mã được chạy (tất nhiên nó sẽ không phù hợp trong mọi trường hợp).
Màu sắc được cung cấp bởi các giá trị số. Bạn nên sử dụng ký hiệu RGB (Red, Green, Blue) cho việc này. Bạn có thể sử dụng các hằng số màu tiêu chuẩn cho điều này, ví dụ: vbRed, vbBlue, nhưng bạn bị giới hạn ở tám lựa chọn màu sắc.
Có hơn 16,7 triệu màu có sẵn và sử dụng RGB, bạn có thể truy cập tất cả chúng. Điều này dễ dàng hơn nhiều so với việc cố gắng nhớ số nào đi với màu nào. Mỗi số trong ba số màu RGB là từ 0 đến 255.
Lưu ý rằng tham số ‘xlBetween’ là bao gồm vì vậy giá trị ô 100 hoặc 150 sẽ thỏa mãn điều kiện.
Định dạng đa điều kiện
Bạn có thể muốn thiết lập một số quy tắc có điều kiện trong phạm vi dữ liệu của mình để tất cả các giá trị trong một phạm vi được bao phủ bởi các điều kiện khác nhau:
| 12345678910111213141516171819 | Sub MultipleConditionalFormattingExample ()Dim MyRange As Range'Tạo đối tượng phạm viĐặt MyRange = Phạm vi (“A1: A10”)'Xóa các định dạng có điều kiện trước đóMyRange.FormatConditions.Delete'Thêm quy tắc đầu tiênMyRange.FormatConditions.Add Type: = xlCellValue, Operator: = xlBetween, _Công thức1: = "= 100", Công thức2: = "= 150"MyRange.FormatConditions (1) .Interior.Color = RGB (255, 0, 0)'Thêm quy tắc thứ haiMyRange.FormatConditions.Add Type: = xlCellValue, Operator: = xlLess, _Công thức 1: = "= 100"MyRange.FormatConditions (2) .Interior.Color = vbBlue'Thêm quy tắc thứ baMyRange.FormatConditions.Add Type: = xlCellValue, Operator: = xlGreater, _Công thức 1: = "= 150"MyRange.FormatConditions (3) .Interior.Color = vbYellowKết thúc Sub |
Ví dụ này thiết lập quy tắc đầu tiên như trước, với màu ô là đỏ nếu giá trị ô nằm trong khoảng từ 100 đến 150.
Hai quy tắc khác sau đó được thêm vào. Nếu giá trị ô nhỏ hơn 100, thì màu của ô là xanh lam và nếu lớn hơn 150, thì màu của ô là vàng.
Trong ví dụ này, bạn cần đảm bảo rằng tất cả các khả năng của các con số đều được bao phủ và các quy tắc không trùng lặp.
Nếu các ô trống nằm trong phạm vi này, thì chúng sẽ hiển thị là màu xanh lam, vì Excel vẫn coi chúng là có giá trị nhỏ hơn 100.
Cách giải quyết vấn đề này là thêm vào một điều kiện khác dưới dạng một biểu thức. Điều này cần được thêm vào làm quy tắc điều kiện đầu tiên trong mã. Điều rất quan trọng là khi có nhiều quy tắc, để có thứ tự thực hiện đúng, nếu không kết quả có thể không thể đoán trước được.
| 1234567891011121314151617181920212223 | Sub MultipleConditionalFormattingExample ()Dim MyRange As Range'Tạo đối tượng phạm viĐặt MyRange = Phạm vi (“A1: A10”)'Xóa các định dạng có điều kiện trước đóMyRange.FormatConditions.Delete'Thêm quy tắc đầu tiênMyRange.FormatConditions.Add Type: = xlExpression, Formula1: = _"= LEN (TRIM (A1)) = 0"MyRange.FormatConditions (1) .Interior.Pattern = xlNone'Thêm quy tắc thứ haiMyRange.FormatConditions.Add Type: = xlCellValue, Operator: = xlBetween, _Công thức1: = "= 100", Công thức2: = "= 150"MyRange.FormatConditions (2) .Interior.Color = RGB (255, 0, 0)'Thêm quy tắc thứ baMyRange.FormatConditions.Add Type: = xlCellValue, Operator: = xlLess, _Công thức 1: = "= 100"MyRange.FormatConditions (3) .Interior.Color = vbBlue'Thêm quy tắc thứ tưMyRange.FormatConditions.Add Type: = xlCellValue, Operator: = xlGreater, _Công thức 1: = "= 150"MyRange.FormatConditions (4) .Interior.Color = RGB (0, 255, 0)Kết thúc Sub |
Điều này sử dụng loại biểu thức xlExpression, sau đó sử dụng công thức Excel tiêu chuẩn để xác định xem một ô trống thay vì một giá trị số.
Đối tượng FormatConditions là một phần của đối tượng Phạm vi. Nó hoạt động giống như một tập hợp với chỉ mục bắt đầu từ 1. Bạn có thể lặp lại đối tượng này bằng cách sử dụng vòng lặp For… Next hoặc For… Each.
Xóa quy tắc
Đôi khi, bạn có thể cần phải xóa một quy tắc riêng lẻ trong một tập hợp nhiều quy tắc nếu nó không phù hợp với yêu cầu dữ liệu.
| 12345678910111213 | Sub DeleteConditionalFormattingExample ()Dim MyRange As Range'Tạo đối tượng phạm viĐặt MyRange = Phạm vi (“A1: A10”)'Xóa các định dạng có điều kiện trước đóMyRange.FormatConditions.Delete'Thêm quy tắc đầu tiênMyRange.FormatConditions.Add Type: = xlCellValue, Operator: = xlBetween, _Công thức1: = "= 100", Công thức2: = "= 150"MyRange.FormatConditions (1) .Interior.Color = RGB (255, 0, 0)'Xóa quy tắcMyRange.FormatConditions (1). XóaKết thúc Sub |
Mã này tạo một quy tắc mới cho phạm vi A1: A10, sau đó xóa nó. Bạn phải sử dụng số chỉ mục chính xác để xóa, vì vậy hãy kiểm tra ‘Quản lý quy tắc’ trên giao diện người dùng Excel (điều này sẽ hiển thị các quy tắc theo thứ tự thực hiện) để đảm bảo rằng bạn nhận được số chỉ mục chính xác. Lưu ý rằng không có cơ sở hoàn tác trong Excel nếu bạn xóa quy tắc định dạng có điều kiện trong VBA, không giống như nếu bạn làm điều đó thông qua giao diện người dùng Excel.
Thay đổi quy tắc
Bởi vì các quy tắc là một tập hợp các đối tượng dựa trên một phạm vi được chỉ định, bạn có thể dễ dàng thực hiện các thay đổi đối với các quy tắc cụ thể bằng cách sử dụng VBA. Các thuộc tính thực tế sau khi quy tắc đã được thêm vào ở chế độ chỉ đọc, nhưng bạn có thể sử dụng phương pháp Sửa đổi để thay đổi chúng. Các thuộc tính như màu sắc được đọc / ghi.
| 123456789101112131415 | Sub ChangeConditionalFormattingExample ()Dim MyRange As Range'Tạo đối tượng phạm viĐặt MyRange = Phạm vi (“A1: A10”)'Xóa các định dạng có điều kiện trước đóMyRange.FormatConditions.Delete'Thêm quy tắc đầu tiênMyRange.FormatConditions.Add Type: = xlCellValue, Operator: = xlBetween, _Công thức1: = "= 100", Công thức2: = "= 150"MyRange.FormatConditions (1) .Interior.Color = RGB (255, 0, 0)'Thay đổi quy tắcMyRange.FormatConditions (1). Sửa đổi xlCellValue, xlLess, "10"‘Thay đổi màu quy tắcMyRange.FormatConditions (1) .Interior.Color = vbGreenKết thúc Sub |
Mã này tạo một đối tượng phạm vi (A1: A10) và thêm quy tắc cho các số từ 100 đến 150. Nếu điều kiện là đúng thì màu ô sẽ chuyển thành màu đỏ.
Sau đó, mã thay đổi quy tắc thành các số nhỏ hơn 10. Nếu điều kiện là đúng thì màu ô bây giờ sẽ chuyển thành màu xanh lục.
Sử dụng bảng màu đã phân cấp
Định dạng có điều kiện trong Excel có phương tiện sử dụng màu chia độ trên một dải số chạy theo thứ tự tăng dần hoặc giảm dần.
Điều này rất hữu ích khi bạn có dữ liệu như số liệu bán hàng theo khu vực địa lý, nhiệt độ thành phố hoặc khoảng cách giữa các thành phố. Sử dụng VBA, bạn có thêm lợi thế là có thể chọn bảng màu chia độ của riêng mình, thay vì các bảng màu tiêu chuẩn được cung cấp trên giao diện người dùng Excel.
| 1234567891011121314151617181920212223242526272829 | Màu phụ ()Dim MyRange As Range'Tạo đối tượng phạm viĐặt MyRange = Phạm vi (“A1: A10”)'Xóa các định dạng có điều kiện trước đóMyRange.FormatConditions.Delete'Xác định loại tỷ lệMyRange.FormatConditions.AddColorScale ColorScaleType: = 3'Chọn màu cho giá trị thấp nhất trong phạm viMyRange.FormatConditions (1) .ColorScaleCriteria (1) .Type = _xlConditionValueLowestValueVới MyRange.FormatConditions (1) .ColorScaleCriteria (1) .FormatColor.Màu = 7039480Kết thúc với'Chọn màu cho các giá trị giữa trong phạm viMyRange.FormatConditions (1) .ColorScaleCriteria (2) .Type = _xlConditionValuePercentileMyRange.FormatConditions (1) .ColorScaleCriteria (2) .Value = 50'Chọn màu cho điểm giữa của phạm viVới MyRange.FormatConditions (1) .ColorScaleCriteria (2) .FormatColor.Màu = 8711167Kết thúc với'Chọn màu cho giá trị cao nhất trong phạm viMyRange.FormatConditions (1) .ColorScaleCriteria (3) .Type = _xlConditionValueHighestValueVới MyRange.FormatConditions (1) .ColorScaleCriteria (3) .FormatColor.Màu = 8109667Kết thúc vớiKết thúc Sub |
Khi mã này được chạy, nó sẽ chuyển màu ô theo các giá trị tăng dần trong phạm vi A1: A10.
Đây là một cách hiển thị dữ liệu rất ấn tượng và chắc chắn sẽ thu hút sự chú ý của người dùng.
Định dạng có điều kiện cho các giá trị lỗi
Khi bạn có một lượng lớn dữ liệu, bạn có thể dễ dàng bỏ lỡ một giá trị lỗi trong các trang tính khác nhau của mình. Nếu điều này được trình bày cho người dùng mà không được giải quyết, nó có thể dẫn đến các vấn đề lớn và người dùng mất niềm tin vào các con số. Điều này sử dụng một loại quy tắc của xlExpression và một hàm IsError trong Excel để đánh giá ô.
Bạn có thể tạo mã để tất cả các ô có lỗi đều có màu đỏ:
| 1234567891011 | Lỗi phụConditionalFormattingExample ()Dim MyRange As Range'Tạo đối tượng phạm viĐặt MyRange = Phạm vi (“A1: A10”)'Xóa các định dạng có điều kiện trước đóMyRange.FormatConditions.Delete'Thêm quy tắc lỗiMyRange.FormatConditions.Add Type: = xlExpression, Formula1: = "= IsError (A1) = true"'Đặt màu nội thất thành đỏMyRange.FormatConditions (1) .Interior.Color = RGB (255, 0, 0)Kết thúc Sub |
Định dạng có điều kiện cho các ngày trong quá khứ
Bạn có thể đã nhập dữ liệu mà bạn muốn đánh dấu các ngày trong quá khứ. Ví dụ về điều này có thể là báo cáo của con nợ trong đó bạn muốn nổi bật bất kỳ ngày hóa đơn cũ nào trên 30 ngày.
Mã này sử dụng loại quy tắc của xlExpression và một hàm Excel để đánh giá ngày tháng.
| 1234567891011 | Sub DateInPastConditionalFormattingExample ()Dim MyRange As Range'Tạo đối tượng phạm vi dựa trên cột ngày thángĐặt MyRange = Phạm vi (“A1: A10”)'Xóa các định dạng có điều kiện trước đóMyRange.FormatConditions.Delete'Thêm quy tắc lỗi cho các ngày trong quá khứMyRange.FormatConditions.Add Type: = xlExpression, Formula1: = "= Now () - A1> 30"'Đặt màu nội thất thành đỏMyRange.FormatConditions (1) .Interior.Color = RGB (255, 0, 0)Kết thúc Sub |
Mã này sẽ sử dụng một phạm vi ngày trong phạm vi A1: A10 và sẽ đặt màu ô thành màu đỏ cho bất kỳ ngày nào quá 30 ngày trong quá khứ.
Trong công thức đang được sử dụng trong điều kiện, Now () cung cấp ngày và giờ hiện tại. Điều này sẽ tiếp tục tính toán lại mỗi khi trang tính được tính toán lại, vì vậy định dạng sẽ thay đổi từ ngày này sang ngày tiếp theo.
Sử dụng thanh dữ liệu trong định dạng có điều kiện VBA
Bạn có thể sử dụng VBA để thêm thanh dữ liệu vào một dải số. Chúng gần giống như biểu đồ nhỏ và cung cấp cái nhìn tức thì về mức độ lớn của các con số trong mối quan hệ với nhau. Bằng cách chấp nhận các giá trị mặc định cho các thanh dữ liệu, mã rất dễ viết.
| 123456 | Sub DataBarFormattingExample ()Dim MyRange As RangeĐặt MyRange = Phạm vi (“A1: A10”)MyRange.FormatConditions.DeleteMyRange.FormatConditions.AddDatabarKết thúc Sub |
Dữ liệu của bạn sẽ trông như thế này trên trang tính:
Sử dụng các biểu tượng trong Định dạng có điều kiện VBA
Bạn có thể sử dụng định dạng có điều kiện để đặt các biểu tượng cùng với các số của mình trong một trang tính. Các biểu tượng có thể là mũi tên hoặc hình tròn hoặc nhiều hình dạng khác. Trong ví dụ này, mã thêm các biểu tượng mũi tên vào các số dựa trên giá trị phần trăm của chúng:
| 12345678910111213141516171819202122232425 | Biểu tượng phụSetsExample ()Dim MyRange As Range'Tạo đối tượng phạm viĐặt MyRange = Phạm vi (“A1: A10”)'Xóa các định dạng có điều kiện trước đóMyRange.FormatConditions.Delete'Thêm bộ biểu tượng vào đối tượng FormatConditionsMyRange.FormatConditions.AddIconSetCondition'Đặt biểu tượng được đặt thành mũi tên - điều kiện 1Với MyRange.FormatConditions (1).IconSet = ActiveWorkbook.IconSets (xl3Arrows)Kết thúc với'đặt tiêu chí biểu tượng cho giá trị phần trăm bắt buộc - điều kiện 2Với MyRange.FormatConditions (1) .IconCriteria (2).Type = xlConditionValuePercent.Value = 33.Operator = xlGreaterEqualKết thúc với'đặt tiêu chí biểu tượng cho giá trị phần trăm bắt buộc - điều kiện 3Với MyRange.FormatConditions (1) .IconCriteria (3).Type = xlConditionValuePercent.Value = 67.Operator = xlGreaterEqualKết thúc vớiKết thúc Sub |
Điều này sẽ cung cấp một cái nhìn tức thì cho biết một số là cao hay thấp. Sau khi chạy mã này, trang tính của bạn sẽ giống như sau:
Sử dụng Định dạng có Điều kiện để Đánh dấu Năm đầu
Bạn có thể sử dụng mã VBA để đánh dấu 5 số hàng đầu trong phạm vi dữ liệu. Bạn sử dụng một tham số có tên là ‘AddTop10’, nhưng bạn có thể điều chỉnh số thứ hạng trong mã thành 5. Người dùng có thể muốn xem các số cao nhất trong một phạm vi mà không cần phải sắp xếp dữ liệu trước.
| 1234567891011121314151617181920212223 | Sub Top5Example ()Dim MyRange As Range'Tạo đối tượng phạm viĐặt MyRange = Phạm vi (“A1: A10”)'Xóa các định dạng có điều kiện trước đóMyRange.FormatConditions.Delete'Thêm điều kiện Top10MyRange.FormatConditions.AddTop10Với MyRange.FormatConditions (1)'Đặt thông số từ trên xuống dưới.TopBottom = xlTop10Top'Chỉ đặt top 5.Rank = 5Kết thúc vớiVới MyRange.FormatConditions (1) .Font'Đặt màu phông chữ.Màu = -16383844Kết thúc vớiVới MyRange.FormatConditions (1) .Interior'Đặt màu nền di động.Màu = 13551615Kết thúc vớiKết thúc Sub |
Dữ liệu trên trang tính của bạn sẽ trông như thế này sau khi chạy mã:
Lưu ý rằng giá trị 145 xuất hiện hai lần nên sáu ô được tô sáng.
Tầm quan trọng của các tham số StopIfTrue và SetFirstPinent
StopIfTrue có tầm quan trọng nếu một dải ô có nhiều quy tắc định dạng có điều kiện cho nó. Một ô duy nhất trong phạm vi có thể đáp ứng quy tắc đầu tiên, nhưng nó cũng có thể đáp ứng các quy tắc tiếp theo. Là nhà phát triển, bạn có thể muốn nó chỉ hiển thị định dạng cho quy tắc đầu tiên mà nó sử dụng. Các tiêu chí quy tắc khác có thể trùng lặp và có thể thực hiện các thay đổi ngoài ý muốn nếu được phép tiếp tục trong danh sách các quy tắc.
Mặc định của tham số này là True nhưng bạn có thể thay đổi nó nếu bạn muốn tất cả các quy tắc khác cho ô đó được xem xét:
| 1 | MyRange. FormatConditions (1) .StopIfTrue = False |
Tham số SetFirstPutor cho biết liệu quy tắc điều kiện đó có được đánh giá đầu tiên hay không khi có nhiều quy tắc cho ô đó.
| 1 | MyRange. FormatConditions (1) .SetFirstPinent |
Thao tác này sẽ di chuyển vị trí của quy tắc đó sang vị trí 1 trong tập hợp các điều kiện định dạng và bất kỳ quy tắc nào khác sẽ được chuyển xuống dưới với các số chỉ mục đã thay đổi. Hãy cẩn thận nếu bạn đang thực hiện bất kỳ thay đổi nào đối với các quy tắc trong mã bằng cách sử dụng số chỉ mục. Bạn cần đảm bảo rằng bạn đang thay đổi hoặc xóa đúng quy tắc.
Bạn có thể thay đổi mức độ ưu tiên của quy tắc:
| 1 | MyRange. FormatConditions (1) .Pceptions = 3 |
Điều này sẽ thay đổi vị trí tương đối của bất kỳ quy tắc nào khác trong danh sách định dạng có điều kiện.
Sử dụng định dạng có điều kiện tham chiếu các giá trị ô khác
Đây là một điều mà định dạng có điều kiện trong Excel không thể làm được. Tuy nhiên, bạn có thể xây dựng mã VBA của riêng mình để thực hiện việc này.
Giả sử rằng bạn có một cột dữ liệu và trong ô liền kề với mỗi số, có một số văn bản cho biết định dạng nào sẽ diễn ra trên mỗi số.
Đoạn mã sau sẽ chạy xuống danh sách các số của bạn, hãy tìm trong ô liền kề để định dạng văn bản, sau đó định dạng số theo yêu cầu:
| 123456789101112131415161718192021 | Giới thiệu phụ'Tạo các biến để giữ số hàng cho dữ liệu dạng bảngDim RRow As Long, N As Long'Nắm bắt số lượng hàng trong phạm vi dữ liệu dạng bảngRRow = ActiveSheet.UsedRange.Rows.Count'Lặp lại qua tất cả các hàng trong phạm vi dữ liệu dạng bảngĐối với N = 1 Để RRow'Sử dụng câu lệnh Chọn trường hợp để đánh giá định dạng dựa trên cột 2Chọn Case ActiveSheet.Cells (N, 2) .Value'Chuyển màu nội thất sang màu xanh lamTrường hợp "Xanh lam"ActiveSheet.Cells (N, 1) .Interior.Color = vbBlue'Chuyển màu nội thất sang màu đỏTrường hợp "Đỏ"ActiveSheet.Cells (N, 1) .Interior.Color = vbRed'Chuyển màu nội thất sang xanh lụcTrường hợp "Màu xanh lá cây"ActiveSheet.Cells (N, 1) .Interior.Color = vbGreenKết thúc Lựa chọnN tiếp theoKết thúc Sub |
Khi mã này đã được chạy, trang tính của bạn bây giờ sẽ giống như sau:
Các ô được tham chiếu đến định dạng có thể ở bất kỳ đâu trên trang tính hoặc thậm chí trên một trang tính khác trong sổ làm việc. Bạn có thể sử dụng bất kỳ dạng văn bản nào để tạo điều kiện cho việc định dạng và bạn chỉ bị giới hạn bởi trí tưởng tượng của mình trong các mục đích sử dụng mà bạn có thể đặt mã này.
Các toán tử có thể được sử dụng trong Câu lệnh định dạng có điều kiện
Như bạn đã thấy trong các ví dụ trước, các toán tử được sử dụng để xác định cách các giá trị điều kiện sẽ được đánh giá, ví dụ: xl Giữa.
Có một số toán tử này có thể được sử dụng, tùy thuộc vào cách bạn muốn chỉ định tiêu chí quy tắc của mình.
| Tên | Giá trị | Sự miêu tả |
| xlBet giữa | 1 | Giữa. Chỉ có thể được sử dụng nếu hai công thức được cung cấp. |
| xlEqual | 3 | Bình đẳng. |
| xlGreater | 5 | Lớn hơn. |
| xlGreaterEqual | 7 | Lớn hơn hoặc bằng. |
| xlLess | 6 | Ít hơn. |
| xlLessEqual | 8 | Ít hơn hoặc bằng. |
| xlNotBetween | 2 | Không phải ở giữa. Chỉ có thể được sử dụng nếu hai công thức được cung cấp. |
| xlNotEqual | 4 | Không công bằng. |
