Pages

Thứ Hai, 1 tháng 7, 2019

Thủ thuật tự động tô màu hàng, cột của Excel

Để làm rõ hơn nội dung trong bảng dữ liệu Excel, hoặc đánh dấu số liệu cần chú ý, chúng ta có tùy chọn tô màu xen kẽ các dòng Excel hoặc tô màu xen kẽ ô cho Excel, tùy theo nội dung cần chú ý ở vị trí nào. Khi đó màu sắc hiển thị xen kẽ cho tất cả đối tượng dữ liệu trong bảng.
Trong trường hợp người dùng không muốn tô màu xen kẽ mà chỉ muốn có màu khi click chuột trực tiếp, thì bạn có thể sử dụng code VBA. Với cách này bảng dữ liệu sẽ được nổi bật các giá trị theo hàng hoặc cột khi đối chiếu, bằng cách click chuột khi cần sử dụng mà thôi. Bài viết dưới đây sẽ hướng dẫn bạn đọc các trường hợp tô màu tự động trong Excel.

    Video hướng dẫn tô màu cột và hàng trong Excel

    1. Cách tô màu hàng Excel khi click chuột

    Bước 1:
    Trong file Excel cần xử lý chúng ta nhấn vào tab Developer trên thanh Ribbon rồi chọn Visual Basic hoặc nhấn tổ hợp phím Alt + F11 để mở trình soạn thảo code VBA.
    Nhấn Visual Basic
    Bước 2:
    Hiển thị giao diện Microsoft Visual Basic for Applications, chúng ta click vào sheet hiện tại ở Project VBAProject để mở hộp thoại Sheet (Code).
    Chọn sheet
    Tiếp đến người dùng nhập đoạn mã code dưới đây vào giao diện rồi nhấn Alt + Q để tắt giao diện này.
    Private Sub Worksheet_SelectionChange(ByVal Target As Range)      On Error Resume Next      Cells.Interior.ColorIndex = 0      ActiveCell.EntireRow.Interior.ColorIndex = 8      Application.CutCopyMode = True      End Sub
    Nhập mã code
    Bước 3:
    Quay lại giao diện bảng dữ liệu Excel khi chúng ta click chuột tại 1 ô thì hàng đó sẽ được tô màu như hình dưới đây. Các hàng tự động được tô màu khi bạn click chuột.
    Tô màu dòng

    2. Cách tô màu cột Excel tự động

    Bước 1:
    Chúng ta cũng nhấn tổ hợp phím Alt + F11 để mở trình soạn code VBA lên. Tại giao diện này bạn tiếp tục click đúp vào sheet hiện tại đang mở trong giao diện Project VBAProject. Nhập đoạn mã dưới đây vào giao diện VBA và cũng nhấn Alt + Q để tắt giao diện này.
    Private Sub Worksheet_SelectionChange(ByVal Target As Range)      On Error Resume Next      Cells.Interior.ColorIndex = 0      ActiveCell.EntireColumn.Interior.ColorIndex = 8      Application.CutCopyMode = True      End Sub
    Tô màu cột
    Bước 2:
    Kết quả khi bạn click chuột vào bất kỳ 1 ô thì cả cột đó đều được tô màu như hình dưới đây.
    Tô màu cột khi click chuột

    3. Cách tô màu hàng và cột trong Excel

    Khi bạn có yêu cầu tô màu cột hoặc hàng theo giá trị thì sẽ sử dụng 2 cách trên. Trong trường hợp phải đối chiếu so sánh dữ liệu thì chúng ta buộc phải tô màu cả ở hàng và cột.
    Bước 1:
    Trong giao diện nhập mã code VBA, bạn cũng nhấn vào sheet đang làm việc rồi nhập đoạn mã code dưới đây.
    Private Sub Worksheet_SelectionChange(ByVal Target As Range)      On Error Resume Next      Cells.Interior.ColorIndex = 0      ActiveCell.EntireRow.Interior.ColorIndex = 8      ActiveCell.EntireColumn.Interior.ColorIndex = 8      Application.CutCopyMode = True      End Sub
    Hoặc dùng mã code bên dưới đây nếu mã code trên có vấn đề.
    Sub Worksheet_SelectionChange(ByVal Target As Excel.Range)      'Update 20140318      Static xRow      Static xColumn      If xColumn <> "" Then      With Columns(xColumn).Interior      .ColorIndex = xlNone      End With      With Rows(xRow).Interior      .ColorIndex = xlNone      End With      End If      pRow = Selection.Row      pColumn = Selection.Column      xRow = pRow      xColumn = pColumn      With Columns(pColumn).Interior      .ColorIndex = 6      .Pattern = xlSolid      End With      With Rows(pRow).Interior      .ColorIndex = 6      .Pattern = xlSolid      End With      End Sub
    Mã tô màu cột và hàng
    Bước 2:
    Sau khi đóng giao diện nhập mã VBA này, người dùng nhấn bất kỳ vào một ô và thấy cả cột và hàng đi qua ô đó đều được tô màu phân biệt với những ô còn lại.
    Tô màu cột và hàng
    Màu sắc cho các ô khi đánh dấu sẽ phụ thuộc vào bảng giá trị mã màu ColorIndex. Để đổi màu cho cột khi đánh dấu, chúng ta cần thay số giá trị thể hiện cho từng màu theo bảng này.
    Bảng màu VBA
    Để đổi màu chúng ta cần mở giao diện nhập mã trong VBA, rồi thay đổi số giá trị tại ColorIndex = 8 thành ColorIndex = 40 chẳng hạn.
    Đổi giá trị màu
    Khi đó màu dòng trong Excel được chuyển sang màu khác.
    Đổi màu cho dòng
    Với kiểu tô màu cho cột và ô người dùng hoàn toàn có thế kết hợp 2 màu khác nhau trong đoạn mã code.
    Đổi giá trị màu cho cột và dòng
    Kết quả cột và hàng trong Excel đã chuyển thành 2 màu khác nhau như hình dưới đây.
    Đổi màu cho cột và dòng
    Thêm một cách nữa để bạn tô màu cho hàng, cột trong Excel. Chỉ cần nhập code đúng thì hàng và cột khi nhấn chuột vào đều được tô màu, dễ dàng đối chiếu, so sánh hay tìm kiếm thông tin theo hàng hoặc cột, đặc biệt với bảng tính dài.
    Chúc các bạn thực hiện thành công!
    Học viện Đào tạo Trực Tuyến
    Public group · 10280 members
    Chia sẻ kiến thức, kinh nghiệm giúp bạn có nhiều trải nghiệm và kiến thức hơn


    Khóa đào tạo Power BI phân tích báo cáo để bán hàng thành công


    Khóa học AutoIt dành cho dân IT và Marketing chuyên nghiệp

    Khóa học Thiết kế, quản lý dữ liệu dự án chuyên nghiệp cho doanh nghiệp bằng Bizagi
     Khoa hoc hay
    Khóa học Phân tích dữ liệu sử dụng Power Query trong Excel
    Khóa học HƯỚNG DẪN THIẾT KẾ VIDEO CLIP CHO DÂN MARKETING CHUYÊN NGHIỆP
     Xây dựng website​​​​
    HƯỚNG DẪN THIẾT KẾ QUẢNG CÁO VÀ ĐỒ HỌA CHUYÊN NGHIỆP VỚI CANVA
    Hãy tham gia khóa học để trở thành người chuyên nghiệp. Tuyệt HAY!😲👍
     Khoa hoc hay
    http://hoc.elearninghaiphong.com/main/noidungkhoahoc/15



    GOOGLE SPREADSHEETS phê không tưởng
     Khoa hoc hay
    Khóa hoc lập trình bằng Python tại đây

    Hacker mũ trắng




    Hãy tham gia khóa học để biết mọi thứ

    Để tham gia tất cả các bài học, Bạn nhấn vào đây 
    Khóa học sử dụng Adobe Presenter-Tạo bài giảng điện tử
     Khoa hoc hay
    http://hoc.elearninghaiphong.com/main/noidungkhoahoc/71

    Khóa học sử dụng Edmodo để dạy và học hiện đại để thành công

    Cập nhật công nghệ từ Youtube tại link: https://www.youtube.com/channel/UCOxeYcvZPGf-mGLYSl_1LuA/videos
    Để tham gia khóa học công nghệ truy cập link: http://thuvien.hocviendaotao.com
    Mọi hỗ trợ về công nghệ email: dinhanhtuan68@gmail.com