Ẩn những cột trong bảng dữ liệu và trong biểu đồ

Giả sử bạn có một bảng dữ liệu và những biểu đồ hình cột như trong hình dưới .

 

\"\"

 

Làm thế nào chỉ cần hiển thị những cột tương ứng khi lựa chọn mà không cần phải hiển thị tất cả những kết quả , như hình dưới

 

\"\"

 

Đầu tiên bạn cần tạo một bảng dữ liệu , sau đó bấm menu Insert > Table

 

\"\"

 

Bạn chọn vùng dữ liệu và nhớ đánh dấu My tablet has headers

 

\"\"

 

Tiếp theo bạn vẽ những biểu đồ theo bảng dữ liệu trên bằng cách bấm Insert > Column ( hoặc biểu đồ dạng nào bạn muốn trong phần Chart )

 

\"\"

 

Sau khi hoàn tất việc vẽ biểu đồ bạn sẽ thấy như hình dưới

 

\"\"

 

Tiếp theo bạn bấm tổ hợp Alt-F11để mở cửa sổ Visual Basic , bấm chuột phải và Sheet tương ứng bạn đang vẽ biểu đồ , ví dụ Sheet 1 và chọn View Code

 

\"\"

 

Bạn dán theo nội dung bên dưới

 

Private Sub Worksheet_Change(ByVal Target As Range)

Dim c As Integer

If Not Intersect(Target, Range("A17")) Is Nothing Then

    Application.ScreenUpdating = False

    Range("Table1").EntireColumn.Hidden = False

    For c = 2 To Range("Table1").Columns.Count

        If Range("Table1[#All]").Cells(c) <> Range("A17") Then

            Range("Table1").Cells(c).EntireColumn.Hidden = True

        End If

    Next c

    Application.ScreenUpdating = True

End If

End Sub

 

Quay trở lại Excel , lúc này ô A17 bạn sẽ cần khai báo kiểu Data Validation .

Phần Allow , chọn List và phần Source là danh sách từ B1 tới E1

 

\"\"

 

Lúc này ở ô A17 bạn có thể thay đổi theo từng phần để hiển thị cột tương ứng với biểu đồ tương ứng rất thuận tiện .

 

\"\"

 

 

\"\"\"\"