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

Blue Softs Liên hệ QC

kan1231

Thành viên chính thức
Tham gia
1/6/18
Bài viết
78
Được thích
39
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: 17

befaint

|||||||||||||
Tham gia
6/1/11
Bài viết
12,221
Được thích
15,074
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

kan1231

Thành viên chính thức
Tham gia
1/6/18
Bài viết
78
Được thích
39
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

Lê Duy Thương

Cạo lấy gì gội (Dịch quá không gội được)
Tham gia
14/10/09
Bài viết
3,088
Được thích
4,807
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

ptm0412

Bad Excel Member
Thành viên BQT
Super Moderator
Tham gia
4/11/07
Bài viết
11,496
Được thích
32,449
Donate (Momo)
Donate
Giới tính
Nam
Nghề nghiệp
Consultant
Upvote 0

VetMini

Chuyên gia GPE
Tham gia
21/12/12
Bài viết
12,128
Được thích
15,544
đâ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

kan1231

Thành viên chính thức
Tham gia
1/6/18
Bài viết
78
Được thích
39
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

ptm0412

Bad Excel Member
Thành viên BQT
Super Moderator
Tham gia
4/11/07
Bài viết
11,496
Được thích
32,449
Donate (Momo)
Donate
Giới tính
Nam
Nghề nghiệp
Consultant
Upvote 0
Top Bottom