Xin giúp đỡ file tự ẩn kết quả khi bằng 0

Liên hệ QC

kan1231

Thành viên chính thức
Tham gia
1/6/18
Bài viết
89
Được thích
44
em có 1 file tính tổng số lượng các cỡ xuất hàng, nhưng mỗi mã hàng có cỡ khác nhau
em muôn khi lọc mã hàng thì các cột có tổng bằng 0 sẽ tự động ẩn đi (dòng tổng e dùng hàm subtotal ạ)
mong mọi người giúp e viet code VBA cho file ạ, em không biết gì về VBA code ạ
em xin cảm ơn mọi người ạ
1627037249576.png
 

File đính kèm

  • an cot.xlsx
    70.1 KB · Đọc: 18
Chụp cái ảnh lại cắt cụt hết địa chỉ dòng/ cột đi thì làm ăn gì được. Ráng chỉnh theo thực tế nhé.

PHP:
Sub anCotTheoDong0()
Const lngDongTong = 100 ' dòng tính tổng theo hàm subtotal '
Const startCol =        ' địa chỉ cột bắt đầu xét tổng '
Const numColsTong = 200 ' số cột tính tổng '
Dim dataTong as variant, iCol as long, rngTong0 as range
Dim ws as worksheet
set ws = activesheet
ws.Rows(1).EntireColumn.Hidden = false
dataTong = ws.Cells(lngDongTong, startCol).Resize(1, numColsTong ).value2
set rngTong0 = ws.Range("XFD1")
For iCol = 1 to numColsTong
if dataTong(1, iCol) = 0 then set rngTong0 = union(rngTong0, ws.Cells(lngDongTong, startCol + iCol - 1) )
Next iCol
rngTong0.EntireColumn.Hidden = True
End Sub
[php]
 
Upvote 0
Chụp cái ảnh lại cắt cụt hết địa chỉ dòng/ cột đi thì làm ăn gì được. Ráng chỉnh theo thực tế nhé.

PHP:
Sub anCotTheoDong0()
Const lngDongTong = 100 ' dòng tính tổng theo hàm subtotal '
Const startCol =        ' địa chỉ cột bắt đầu xét tổng '
Const numColsTong = 200 ' số cột tính tổng '
Dim dataTong as variant, iCol as long, rngTong0 as range
Dim ws as worksheet
set ws = activesheet
ws.Rows(1).EntireColumn.Hidden = false
dataTong = ws.Cells(lngDongTong, startCol).Resize(1, numColsTong ).value2
set rngTong0 = ws.Range("XFD1")
For iCol = 1 to numColsTong
if dataTong(1, iCol) = 0 then set rngTong0 = union(rngTong0, ws.Cells(lngDongTong, startCol + iCol - 1) )
Next iCol
rngTong0.EntireColumn.Hidden = True
End Sub
[php]
anh ơi, chỗ Const startCol = ' địa chỉ cột bắt đầu xét tổng '
em sửa là như thế này được không ạ
Const startCol = Sheets("Sheet4 (2)").Cells(10, 2)
hay là như dưới ạ
const startCol = wsSheet4 (2).getRange("j3").getValue()
em không biết gì về VBA luôn ạ o_O
1627099460664.png
 
Upvote 0
em có 1 file tính tổng số lượng các cỡ xuất hàng, nhưng mỗi mã hàng có cỡ khác nhau
em muôn khi lọc mã hàng thì các cột có tổng bằng 0 sẽ tự động ẩn đi (dòng tổng e dùng hàm subtotal ạ)
mong mọi người giúp e viet code VBA cho file ạ, em không biết gì về VBA code ạ
em xin cảm ơn mọi người ạ
View attachment 262893
code ket làm gì cho mệt nếu bạn không rành
trong office 365 có hàm này
=FILTER($A$2:$AP$39,$A$39:$AP$39>0,"")
 
Upvote 0
Upvote 0
đây bác, cháu không biết gì nên tìm trên google, thấy giống nên cháu áp dụng thử thôi ạ
Code bạn thấy đó là code của Google Apps Script.
Lần sau nhớ nhìn cho rõ loại ngôn ngữ trước khi "thấy nó giống"

Mỗi ngôn ngữ có cách định nghĩa Const khác nhau.

- Trong VBA, Const (lưu ý: cũng như mọi keywords trong, VBA, viết hoa) dùng để khai báo một hằng số. Thường thì người ta dùng hằng số để xác định thông số tính toán cho hàm/phương thức.

- Trong hẩu hết các ngôn ngữ khác const (lưu ý: không viết hoa) dùng để khai báo một biến mà trị chỉ gán một lần, và không thể thay đổi. Đối với các ngôn ngữ này, việc gán chỉ một lần này bảo đảm biến không bị thay đổi nửa chừng.
JavaScript là một trong những ngôn ngữ sử dụng const kiểu này. Và Google Apps Script căn bản dựa trên JavaScript.
(const còn một đặc tính khác về tầm vực, nhưng không nên bàn thêm ở đây)
 
Upvote 0
Code bạn thấy đó là code của Google Apps Script.
Lần sau nhớ nhìn cho rõ loại ngôn ngữ trước khi "thấy nó giống"

Mỗi ngôn ngữ có cách định nghĩa Const khác nhau.

- Trong VBA, Const (lưu ý: cũng như mọi keywords trong, VBA, viết hoa) dùng để khai báo một hằng số. Thường thì người ta dùng hằng số để xác định thông số tính toán cho hàm/phương thức.

- Trong hẩu hết các ngôn ngữ khác const (lưu ý: không viết hoa) dùng để khai báo một biến mà trị chỉ gán một lần, và không thể thay đổi. Đối với các ngôn ngữ này, việc gán chỉ một lần này bảo đảm biến không bị thay đổi nửa chừng.
JavaScript là một trong những ngôn ngữ sử dụng const kiểu này. Và Google Apps Script căn bản dựa trên JavaScript.
(const còn một đặc tính khác về tầm vực, nhưng không nên bàn thêm ở đây)
dạ vâng, cháu cảm ơn bác đã chỉ dạy ạ
 
Upvote 0
Upvote 0
Web KT
Back
Top Bottom