Bỏ qua nội dung chính

Làm cách nào để tô màu các hàng thay thế cho các ô đã hợp nhất trong Excel?

Sẽ rất hữu ích khi định dạng các hàng thay thế có màu khác trong một dữ liệu lớn để chúng tôi quét dữ liệu, nhưng đôi khi, có thể có một số ô được hợp nhất trong dữ liệu của bạn. Để đánh dấu các hàng xen kẽ với một màu khác cho các ô đã hợp nhất như hình minh họa bên dưới, làm cách nào bạn có thể giải quyết vấn đề này trong Excel?

Tô màu các hàng thay thế cho các ô đã hợp nhất với Định dạng có Điều kiện

Tô màu các hàng thay thế cho các ô đã hợp nhất với mã VBA


Tô màu các hàng thay thế cho các ô đã hợp nhất với Định dạng có Điều kiện

Trong Excel, tính năng mạnh mẽ-Định dạng có điều kiện có thể giúp bạn đạt được nhiệm vụ này nhanh nhất có thể, vui lòng thực hiện theo các bước sau:

1. Chọn phạm vi dữ liệu có chứa các ô đã hợp nhất mà bạn muốn tô màu xen kẽ, sau đó bấm Trang Chủ > Định dạng có điều kiện > Quy tắc mới, xem ảnh chụp màn hình:

2. Trong cửa sổ bật ra Quy tắc định dạng mới hộp thoại, hãy thực hiện các thao tác sau:

  • Chọn Sử dụng công thức để xác định ô cần định dạng tùy chọn từ Chọn một loại quy tắc hộp danh sách;
  • Và sau đó nhập công thức này: =MOD(COUNTA($A$2:$A2),2)=0 vào Định dạng các giá trị trong đó công thức này đúng hộp văn bản.
  • Chú thích: A2 là ô đầu tiên trong phạm vi dữ liệu của bạn.

3. Sau đó nhấn vào Định dạng nút để đi đến Format Cells hộp thoại. Phía dưới cái Điền , chọn một màu bạn muốn đánh dấu các hàng, xem ảnh chụp màn hình:

4. Nhấp chuột OK > OK để đóng hộp thoại và các hàng có các ô đã hợp nhất được tô bằng màu bạn đã chỉ định, hãy xem ảnh chụp màn hình:

5. Tiếp tục nhấp Trang Chủ > Định dạng có điều kiện > Quy tắc mới để mở Quy tắc định dạng mới hộp thoại, hãy thực hiện các thao tác sau:

  • Chọn Sử dụng công thức để xác định ô cần định dạng tùy chọn từ Chọn một loại quy tắc hộp danh sách;
  • Và sau đó nhập công thức này: =MOD(COUNTA($A$2:$A2),2)=1 vào Định dạng các giá trị trong đó công thức này đúng hộp văn bản.
  • Sau đó nhấn vào Định dạng để chọn một màu khác mà bạn muốn đánh dấu các hàng.
  • Chú thích: A2 là ô đầu tiên trong phạm vi dữ liệu của bạn.

6. Và sau đó, nhấp vào OK > OK để đóng hộp thoại và bây giờ, bạn có thể thấy dải dữ liệu đã chọn đã được tô bóng bằng hai màu khác nhau xen kẽ dựa trên các ô đã hợp nhất như hình minh họa bên dưới:


Tô màu các hàng thay thế cho các ô đã hợp nhất với mã VBA

Ngoại trừ Định dạng có điều kiện thông thường, bạn cũng có thể sử dụng mã VBA để áp dụng màu hàng thay thế cho các ô đã hợp nhất một cách dễ dàng.

1. Giữ ALT + F11 phím để mở Microsoft Visual Basic cho các ứng dụng cửa sổ.

2. Sau đó nhấn vào Chèn > Mô-đunvà dán mã sau vào Mô-đun cửa sổ.

Mã VBA: Màu hàng thay thế cho các ô đã hợp nhất

Sub Kutools_AlternateColor()
'Update by ExtendOffice
Dim xRg As Range
Dim xCRg As Range
Dim xIRg As Range
Dim xC1, xC2 As Integer
Dim xR1 As Integer
Dim xCnt As Long
Dim xLColor, xDCR1, xDCR2 As Long
Set xRg = Application.InputBox("Please select the data range:", "KutoolsforExcel", "", Type:=8)
If TypeName(xRg) = "Nothing" Then Exit Sub
Set xCRg = Application.InputBox("Please select the column with the merged cells:", "KutoolsforExcel", "", Type:=8)
If TypeName(xCRg) = "Nothing" Then Exit Sub
Set xIRg = Intersect(xRg, xCRg)
If xIRg Is Nothing Then
MsgBox "the data range doesn't contain merged cells"
Exit Sub
End If
xC1 = xRg.Column
xC2 = xIRg.Column
xR1 = xRg.Row
xLColor = RGB(221, 235, 247)
xDCR1 = RGB(221, 235, 247)
xDCR2 = RGB(250, 232, 222)
xRw = 0
Do
xLColor = xDCR1 + xDCR2 - xLColor
xCnt = Cells(xRw + xR1, xC2).MergeArea.Rows.Count
Cells(xRw + xR1, xC1).Resize(xCnt, xRg.Columns.Count).Interior.Color = xLColor
xRw = xRw + xCnt
Loop While xRw < xRg.Rows.Count - 1
End Sub

3. Sau đó nhấn F5 để chạy mã này. Trong hộp bật ra đầu tiên, hãy chọn phạm vi dữ liệu bạn muốn sử dụng, xem ảnh chụp màn hình:

4. Trong hộp nhắc thứ hai, chọn cột có các ô đã hợp nhất, xem ảnh chụp màn hình:

5. Và sau đó, nhấp vào OK , các hàng được tô bóng xen kẽ dựa trên các ô đã hợp nhất như hình minh họa bên dưới:


Video: Tô màu các hàng thay thế cho các ô được hợp nhất


Các bài viết tương đối hơn:

  • Lọc tất cả dữ liệu có liên quan từ các ô được hợp nhất
  • Giả sử có một cột gồm các ô được hợp nhất trong phạm vi dữ liệu của bạn và bây giờ, bạn cần lọc cột này với các ô đã hợp nhất để hiển thị tất cả các hàng có liên quan với mỗi ô được hợp nhất như sau ảnh chụp màn hình được hiển thị. Trong excel, tính năng Bộ lọc cho phép bạn lọc chỉ mục đầu tiên liên kết với các ô đã hợp nhất, trong bài viết này, tôi sẽ nói về cách lọc tất cả dữ liệu liên quan từ các ô đã hợp nhất trong Excel?
  • Sao chép và dán các ô đã hợp nhất vào các ô đơn
  • Thông thường, khi bạn sao chép các ô đã hợp nhất và dán chúng vào các ô khác, các ô đã hợp nhất sẽ được dán trực tiếp. Tuy nhiên, bạn muốn dán các ô đã hợp nhất của chủ đề này vào các ô đơn lẻ như ảnh chụp màn hình sau được hiển thị, để bạn có thể xử lý dữ liệu khi cần. Bài viết này, tôi sẽ nói về cách sao chép và dán các ô đã hợp nhất vào các ô đơn.
  • Xóa nội dung của nhiều ô được hợp nhất
  • Nếu bạn có một trang tính lớn chứa nhiều ô đã hợp nhất và bây giờ, bạn muốn xóa tất cả nội dung của các ô đã hợp nhất nhưng vẫn giữ các ô đã hợp nhất. Thông thường, bạn có thể thử áp dụng chức năng Tìm và Thay thế để chọn tất cả các ô đã hợp nhất trước, sau đó nhấn phím Delete để xóa giá trị, tuy nhiên, bạn sẽ nhận được thông báo cảnh báo "Chúng tôi không thể làm điều đó với ô đã hợp nhất". Trong trường hợp này, làm cách nào để xóa các giá trị trong các ô đã hợp nhất nhưng vẫn rời khỏi các ô đã hợp nhất một cách nhanh chóng trong Excel?
  • Số ô được hợp nhất tự động
  • Làm cách nào chúng ta có thể điền số sê-ri vào danh sách các ô hợp nhất có kích thước khác nhau trong Excel? Đầu tiên, chúng tôi nghĩ đến việc kéo nút điều khiển Tự động điền để điền vào các ô đã hợp nhất, nhưng trong trường hợp này, chúng tôi sẽ nhận được thông báo cảnh báo sau và không thể điền vào các ô đã hợp nhất.

  • Thanh siêu công thức (dễ dàng chỉnh sửa nhiều dòng văn bản và công thức); Bố cục đọc (dễ dàng đọc và chỉnh sửa số lượng ô lớn); Dán vào Dải ô đã Lọchữu ích. Cảm ơn !
  • Hợp nhất các ô / hàng / cột và Lưu giữ dữ liệu; Nội dung phân chia ô; Kết hợp các hàng trùng lặp và Tổng / Trung bình... Ngăn chặn các ô trùng lặp; So sánh các dãyhữu ích. Cảm ơn !
  • Chọn trùng lặp hoặc duy nhất Hàng; Chọn hàng trống (tất cả các ô đều trống); Tìm siêu và Tìm mờ trong Nhiều Sổ làm việc; Chọn ngẫu nhiên ...
  • Bản sao chính xác Nhiều ô mà không thay đổi tham chiếu công thức; Tự động tạo tài liệu tham khảo sang Nhiều Trang tính; Chèn Bullets, Hộp kiểm và hơn thế nữa ...
  • Yêu thích và Chèn công thức nhanh chóng, Dãy, Biểu đồ và Hình ảnh; Mã hóa ô với mật khẩu; Tạo danh sách gửi thư và gửi email ...
  • Trích xuất văn bản, Thêm Văn bản, Xóa theo Vị trí, Xóa không gian; Tạo và In Tổng số phân trang; Chuyển đổi giữa nội dung ô và nhận xéthữu ích. Cảm ơn !
  • Siêu lọc (lưu và áp dụng các lược đồ lọc cho các trang tính khác); Sắp xếp nâng cao theo tháng / tuần / ngày, tần suất và hơn thế nữa; Bộ lọc đặc biệt bằng cách in đậm, in nghiêng ...
  • Kết hợp Workbook và WorkSheets; Hợp nhất các bảng dựa trên các cột chính; Chia dữ liệu thành nhiều trang tính; Chuyển đổi hàng loạt xls, xlsx và PDFhữu ích. Cảm ơn !
  • Nhóm bảng tổng hợp theo số tuần, ngày trong tuần và hơn thế nữa ... Hiển thị các ô đã mở khóa, đã khóa bởi các màu sắc khác nhau; Đánh dấu các ô có công thức / tênhữu ích. Cảm ơn !
tab kte 201905
  • Cho phép chỉnh sửa và đọc theo thẻ trong Word, Excel, PowerPoint, Publisher, Access, Visio và Project.
  • Mở và tạo nhiều tài liệu trong các tab mới của cùng một cửa sổ, thay vì trong các cửa sổ mới.
  • Tăng 50% năng suất của bạn và giảm hàng trăm cú nhấp chuột cho bạn mỗi ngày!
officetab dưới cùng
Comments (4)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
А еще у вас неверная формула:)
Ну нет такой формулы - СЧЕТЧИК
Правильнее СЧЕТЗ =)
This comment was minimized by the moderator on the site
Hello, Влад
The formulas in this article have been translated, so you can try the below formulas in English:
=MOD(COUNTA($A$2:$A2),2)=0
=MOD(COUNTA($A$2:$A2),2)=1
Please try, hope it can help you!
This comment was minimized by the moderator on the site
Здравствуйте!
Спасибо за статью

У меня есть некоторое замечание
= ОСТАТ (СЧЕТЧИК ($ A $ 2: $ A 2), 2) = 0
правильно , сменить на ;
= ОСТАТ (СЧЕТЧИК ($ A $ 2: $ A 2); 2) = 0

но даже после этого не работает
This comment was minimized by the moderator on the site
Hello, Vlad
The formulas in this article have been translated, so you can try the below formulas in English:
=MOD(COUNTA($A$2:$A2),2)=0
=MOD(COUNTA($A$2:$A2),2)=1

Please try, hope it can help you!
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations