Hỏi về code tự động chèn thêm hoặc bớt dòng theo điều kiện. (1 người xem)

Liên hệ QC

Người dùng đang xem chủ đề này

ThuyDuong2024

Thành viên chính thức
Tham gia
14/12/11
Bài viết
50
Được thích
5
Chào các ace Diễn đàn! Em có một bảng dữ liệu này:
Trong bảng có các nội dung sau:
Khi chọn 1 giá trị tại ô X1 bằng công cụ Spin Buton để dữ liệu tại 1 dòng (chứa ô B10) sẽ thay đổi (là kết quả trả về từ sheet Nhập liệu) thì các Tiêu chuẩn liên quan đến công tác này sẽ thay đổi theo ở Bảng 2 (tiêu chuẩn). VD: Nếu công tác đó có 3 TC đi kèm (ở bảng Nhập liệu) thì Bảng 2 sẽ tự động chèn đủ dòng và hiển thị các tiêu chuẩn đó.
Nội dung chi tiết e gửi kèm file, mong mọi người giúp ạ!
 

File đính kèm

Chào các ace Diễn đàn! Em có một bảng dữ liệu này:
Trong bảng có các nội dung sau:
Khi chọn 1 giá trị tại ô X1 bằng công cụ Spin Buton để dữ liệu tại 1 dòng (chứa ô B10) sẽ thay đổi (là kết quả trả về từ sheet Nhập liệu) thì các Tiêu chuẩn liên quan đến công tác này sẽ thay đổi theo ở Bảng 2 (tiêu chuẩn). VD: Nếu công tác đó có 3 TC đi kèm (ở bảng Nhập liệu) thì Bảng 2 sẽ tự động chèn đủ dòng và hiển thị các tiêu chuẩn đó.
Nội dung chi tiết e gửi kèm file, mong mọi người giúp ạ!
Mã:
Sub hideColumnsBasedOnConditionZeroBlank()

LastColumn = 25 ‘Last Column

For i = 1 To LastColumn ‘Lopping through each Column

    ‘Hide all the columns with the values as 0 in Row 1

    If Cells(1, i) = 0 or Cells(1, i) = “” Then Columns(i).EntireColumn.Hidden = True

Next

End Sub
 
Upvote 0
Công nhận là khi tải file về thì thấy cái bài 2 chẳng có gì ăn nhậu với nhau cả. Sao bạn không thêm 1 cột ghi tiêu chuẩn sẽ thuận lợi hơn là thêm nguyên 1 bảng ở dưới
 
Upvote 0
Web KT

Bài viết mới nhất

Back
Top Bottom