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

Liên hệ QC

ThuyDuong2024

Thành viên mới
Tham gia
14/12/11
Bài viết
30
Được thích
1
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

  • Form tu dong chen dong.xlsx
    19.9 KB · Đọc: 13
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
Back
Top Bottom