Lọc dữ liệu

[saobekhonglac]

Chào anh/chị.
Em có file excel gồm 2 sheet. Sheet 1 từ A3 đến B10 em link dữ liệu từ A1 đến B8 của sheet 2. Em nhờ anh/chị viết giúp em code sau cho khi em bấm filters thì sẽ lọc những hàng từ A3 đến E10 (chỉ lọc những dòng có giá trị tại cột D >0. Khi em đổi dữ liệu tại cột B bên sheet 2 (dán cột C sang B) thì dữ liệu bên sheet 1 sẽ thay đổi, khi đó bấm nút filters lại lần nữa thì dữ liệu sẽ tự lọc những dòng có giá trị cột D >0.
Cám ơn anh chị.

 

[doveandrose]

Chào anh/chị.
Em có file excel gồm 2 sheet. Sheet 1 từ A3 đến B10 em link dữ liệu từ A1 đến B8 của sheet 2. Em nhờ anh/chị viết giúp em code sau cho khi em bấm filters thì sẽ lọc những hàng từ A3 đến E10 (chỉ lọc những dòng có giá trị tại cột D >0. Khi em đổi dữ liệu tại cột B bên sheet 2 (dán cột C sang B) thì dữ liệu bên sheet 1 sẽ thay đổi, khi đó bấm nút filters lại lần nữa thì dữ liệu sẽ tự lọc những dòng có giá trị cột D >0.
Cám ơn anh chị.

có cái cột gì mà ở trên có chữ C ở dưới có chữ D thì tôi biết nó gọi là cột gì bạn ?

 

[giangleloi]

Chào anh/chị.
Em có file excel gồm 2 sheet. Sheet 1 từ A3 đến B10 em link dữ liệu từ A1 đến B8 của sheet 2. Em nhờ anh/chị viết giúp em code sau cho khi em bấm filters thì sẽ lọc những hàng từ A3 đến E10 (chỉ lọc những dòng có giá trị tại cột D >0. Khi em đổi dữ liệu tại cột B bên sheet 2 (dán cột C sang B) thì dữ liệu bên sheet 1 sẽ thay đổi, khi đó bấm nút filters lại lần nữa thì dữ liệu sẽ tự lọc những dòng có giá trị cột D >0.
Cám ơn anh chị.

Híc. Có thể có cái file đàng hoàng hơn hông, để nếu đọc yêu cầu không hiểu may ra còn nhìn file tưởng tượng được.

 

[saobekhonglac]

Dòng 1 và 2 chỉ là tiêu đề, mình cần filter từ dòng 3 với điều kiện dữ liệu từ D3 trở xuống >0, khi dữ liệu thay đổi thì bấm filter vẫn lọc tiếp tục., thay vì filter tay thì mình bấm vào mũi tên và còn loại số 0 & rỗng, sau đó muốn filter lại thì nhấp vào mũi tên và enter tiếp (mình muốn nhấn nút cho nhanh hơn)
Mình dùng macro thì ra code

Sub loc()ActiveSheet.Range("$A$2:$D$10").AutoFilter Field:=4, Criteria1:=Array("11", _
"12", "5", "6", "8", "9"), Operator:=xlFilterValues
End Sub

Nhưng không biết với số lượng nhiều dòng hơn và giá trị số lớn hơn thì nó có hiểu hay không vì mình không rành VBA

Híc. Có thể có cái file đàng hoàng hơn hông, để nếu đọc yêu cầu không hiểu may ra còn nhìn file tưởng tượng được.

 

[saobekhonglac]

Chỉ có anh HPKhuong là hiểu em nhất

Sub GPE()
Sheet1.Range("A2:D10").AutoFilter 4, ">0"
End Sub