Giúp đoạn code loc theo điều kiện chỉ định

  • Thread starter Thread starter new2008
  • Ngày gửi Ngày gửi
Liên hệ QC

new2008

Thành viên mới
Tham gia
23/9/08
Bài viết
15
Được thích
1
Chào cả nhà

Các bạn giúp mình đưa them điều kiện " tên thiết bị" vào đoạn code khi bấm Cb "lọc dữ liệu", nghĩa là điều kiện lọc chỉ được thực hiện khi chọn "tên thiết bi" ở ô B1 với "tên thiết bị" có nguồn nằm ở sheet " Nhatky".
Các bạn giúp luôn cái name động "TB" chỉ thể hiện từng tên "TB" đại diện luôn nha.

Thank các bạn trước.
 

File đính kèm

Chào cả nhà

Các bạn giúp mình đưa them điều kiện " tên thiết bị" vào đoạn code khi bấm Cb "lọc dữ liệu", nghĩa là điều kiện lọc chỉ được thực hiện khi chọn "tên thiết bi" ở ô B1 với "tên thiết bị" có nguồn nằm ở sheet " Nhatky".
Các bạn giúp luôn cái name động "TB" chỉ thể hiện từng tên "TB" đại diện luôn nha.

Thank các bạn trước.
Sao bạn không dùng Auto filter cho nó lẹ
 
Upvote 0
Chào cả nhà

Các bạn giúp mình đưa them điều kiện " tên thiết bị" vào đoạn code khi bấm Cb "lọc dữ liệu", nghĩa là điều kiện lọc chỉ được thực hiện khi chọn "tên thiết bi" ở ô B1 với "tên thiết bị" có nguồn nằm ở sheet " Nhatky".
Các bạn giúp luôn cái name động "TB" chỉ thể hiện từng tên "TB" đại diện luôn nha.

Thank các bạn trước.

Bạn khảo cái A-Tools Free này xem.

http://www.bluesofts.net/Products/AddIns/A-Tools/Index.htm
 
Upvote 0
Giúp vui cho bạn đoạn code nếu như thoả điều kiện thì hiện còn ngược lại thì ẩn đi.
Để hiện hết bạn gỏ dấu *

Mã:
Sub andong()
Application.ScreenUpdating = False
Dim cell
For Each cell In Range("b4:b44")
   cell.EntireRow.Hidden = True
   If cell Like Range("b1") Then
   cell.EntireRow.Hidden = False
   End If
Next cell
Application.ScreenUpdating = True
End Sub

Bạn xem file nhe
P/S: Bạn nên tham khảo cách tạo name cho validation nhé.
 

File đính kèm

Upvote 0
Nhờ sửa đoạn code lọc dữ liệu

Tôi chưa rành lắm về cách viết code trong VBA nhưng tôi có tham khảo một số đoạn code mẫu và định làm cho mình một chương trình nhỏ mà đang gặp khó khăn , tôi tải lên file đính kèm nhờ anh em giúp đỡ sửa dùm :
- Khi lọc dữ liệu từ sheet "Ap 1" sang Sheet1 theo đoạn code tôi đã làm thì có một số cột không hiện nội dung .
- Cụ thể ở chương trình này tôi cần lọc theo 2 điều kiện là ngày , tháng , năm sinh và chỗ ở hiện nay .
Vậy rất mong anh em giúp dùm , tôi rất cần . Cảm ơn trước ! Nhân dịp năm mới , chúc vạn sự như ý , vui vẻ .
 

File đính kèm

Upvote 0
Web KT

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

Back
Top Bottom