đánh dấu "x" lọc dữ liệu qua một sheet khác

abache9

New Member
Hội viên mới
View attachment 14539 nhờ các anh chị giúp em sao đánh dấu x vào cột "đánh dấu x" dữ liệu sắp xếp theo thứ tự từng dòng một trong sheet mới.
cám ơn anh chị
 

Đính kèm

  • thu nghiem.xls
    36 KB · Lượt xem: 227
Ðề: đánh dấu "x" lọc dữ liệu qua một sheet khác

1- Trong Sheet Candidate chỉ là data
2- Sheet On-Board
a- ColB --> =IF(Candidate!G13="x",Candidate!B13,"")
b- ColE --> =IF(Candidate!G13="x",Candidate!C13,"")
c- ColF --> =IF(Candidate!G13="x",Candidate!D13,"")
3- Trong VBA On-Board
Private Sub worksheet_change(ByVal Target As Range)
Sheet2.Range("B1:C100").Value = Sheet1.Range("A1:B100").Value
End Sub

4- ko có Sheet2

Anyway, Sheet On-Board ko hiện gì ra hết , tào lao . Delete cái formula đi thì muốn type gì "x" cột Fcũng được
(ColF --> =IF(Candidate!G13="x",Candidate!D13,""))
Trong cột F thì define điều kiện 1 đằng, VBA viết 1 nẻo

Delete cái 3 trợn code tào lao (XÁC ĐỊNH vùng sheet Candidate )
 
Sửa lần cuối:
Ðề: đánh dấu "x" lọc dữ liệu qua một sheet khác

:cuoiranuocmat: ac nhầm . SR anh em
 
Ðề: đánh dấu "x" lọc dữ liệu qua một sheet khác

View attachment 14539 nhờ các anh chị giúp em sao đánh dấu x vào cột "đánh dấu x" dữ liệu sắp xếp theo thứ tự từng dòng một trong sheet mới.
cám ơn anh chị

Xóa code đi, rồi thay công thức như sau vào Sheet On-board:

- B2 =IF(Candidate!G2="x",Candidate!B2,"")
- C2 =IF(Candidate!G2="x",Candidate!C2,"")
- D2 =IF(Candidate!G2="x",Candidate!D2,"")
- E2 =IF(Candidate!G2="x",Candidate!E2,"")
- F2 =IF(Candidate!G2="x",Candidate!F2,"")

Chọn B2 đến F2 rồi Fill công thức xuống, sau đó gán code vào Sheet On-board.

Private Sub worksheet_change(ByVal Target As Range)
Sheet3.Range("B1:G100").Value = Sheet1.Range("A1:F100").Value
End Sub

Nhưng cách này dòng nào không đánh dấu nó trống thấy kỳ quá.
 
Ðề: đánh dấu "x" lọc dữ liệu qua một sheet khác

Sửa bài trên cho vui thôi, chứ tôi đã thay bằng Code mới.

Hướng dẫn:

- Gõ x vào danh sách sheet Candidate.
- Sang sheet On-board, gõ x vào G2 sẽ được kết quả.

Xem File đính kèm.
 

Đính kèm

  • Filter DANH SACH.rar
    20.6 KB · Lượt xem: 253
Sửa lần cuối:

CẨM NANG KẾ TOÁN TRƯỞNG


Liên hệ: 090.6969.247

KÊNH YOUTUBE DKT

Kỹ thuật giải trình thanh tra BHXH

Đăng ký kênh nhé cả nhà

SÁCH QUYẾT TOÁN THUẾ


Liên hệ: 090.6969.247

Top